Select Code to Download

#!/usr/bin/perl -w
...
        next unless eof;
        $lineid++;
}

my $experience = "nonexistent";
my $thoughts = "worthless";
unless ($experience) { print "You're $thoughts\n"; }