Help for this page

Select Code to Download


  1. or download this
    *PI = \3.14159;
*STR = \'Some string';
# etc.
  2. or download this
    use warnings;
use strict;
...
warn "$@";
eval { foo($str2) };
warn "$@";
  3. or download this
    $ perl tst.pl
Warning: something's wrong at tst.pl line 10.
Warning: something's wrong at tst.pl line 12.
Warning: something's wrong at tst.pl line 14.