#!/usr/bin/perl #script cgi d'identification du client en ligne, avant de passer sa commande use DBI; use CGI; require "cgi-lib.pl"; $html = new CGI; print $html->header; print <<"EOM";