klaus: Formulare was wird an Perl übergeben? (Nur Profis)

Beitrag lesen

Hi,

Wenn ich ein HTML Formular an ein Perl-Script absende was wird da genau übermittelt?

finde es doch selbst heraus (mal aus dem Lehrbuch):

  
my $key;  
my %args = read_params();  
  
foreach $key (keys %args){  
  print $args{$key};  
}  
  
sub read_params {  
    my $input = '';  
    my %args;  
    read( STDIN, $input, $ENV{'CONTENT_LENGTH'} ) if ( $ENV{'CONTENT_LENGTH'} );  
    foreach my $parameter ( split /[&;]/, $input ) {  
        my ( $key, $val ) = split( /=/, $parameter );  
        $args{$key} = $val;  
    }  
    return %args;  
}#read_params  

hth, klaus