Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl
    use strict;
    ...
       } # end if ( my $ua = LWP::UserAgent->new )
       return;
    }
    
  2. or download this
    [root@localhost cgi-bin]# perl kk.pl
    Content-Type: text/html
    ...
    </CENTER>
    </BODY></HTML>
    [root@localhost cgi-bin]#
    
  3. or download this
    $ip=|192.168.0.8|, $script=|SNSphone2e.pl|, $msg=|EX=RUT&LOGIN=testcas
    +hier&PASSWORD=testcashier&FLOORID=TEST&HPNUM=1234|
    failed response Permission denied