- or download this
#!/usr/bin/perl -w
use strict;
...
}
print end_html;
1;
- or download this
#!/usr/local/bin/perl -w
...
{ print "Yay!"; }
else
{ print "Login failed: " . $ua->response->status_line; }
- or download this
# from perl -d node_298151.pl
...
foobie&j_password=1999</title>
</head><body><h1>Bummer, wrong password!</h1></body></html>
DB<8>