revjim.net Rotating Header Image

Posts on ‘August 19th, 2001’

perl blows, and so does your mom

Anyone know why this doesn't do what I think t should do:

#!/usr/bin/perl
print POOP::printversion();
print "\n";
package POOP;
use vars qw($VERSION);
$VERSION = "0.1.1";
sub printversion {
return "VER:" . $POOP::VERSION;
}
1;