- or download this
# expires() - alias to expire(). For backward compatibility
sub expires {
return expire(@_);
}
- or download this
#!/usr/bin/perl
use strict; use warnings;
...
}
- or download this
warn ("*****LOGIN ATTEMPT USER INFORMATION Uid: $uid username: $userna
+me password: $password ipaddress: $ipaddress");