Help for this page

Select Code to Download


  1. or download this
    c:\test>perl -E"eval 'sub Foo{ return 12345 }'; print Foo();"
12345
  2. or download this
    c:\test>perl -E"$f = eval 'sub { return 12345 }'; print $f->();"
12345

c:\test>perl -E"$f = eval 'sub { return "bar" }'; print $f->();"
bar