Help for this page

Select Code to Download


  1. or download this
      
#perl v5.10.1

...
close DATA;

#testdata will be undefined
  2. or download this
    DB<2> $testdata = eval <DATA>;
DB<3> x $testdata
#outputs the expected data