Select Code to Download

don't talk nonsense at blah.pl line 23.
  21 learn('nothing');
...
  26 sub learn {
  27     my $self->teach(shift);
Can't use string ("bar") as a subroutine ref while "strict refs" in us
+e at blah.pl line 24.

#!/usr/bin/perl

...
    warn "got it";
} 
__END__