Help for this page
#/usr/bin/perl ... foo(); "; eval_string($string2);
~>perl test.pl first definition Subroutine foo redefined at (eval 2) line 2. second definition