Help for this page

Select Code to Download


  1. or download this
    c:\@Work\Perl>perl -wMstrict -le
    "my %xlate_map = qw/ ( l_paren  ) r_paren  { l_curly  } r_curly /;
    ...
     print qq{'$xlt'};
    "
    'a l_curly b r_curly c l_paren d r_paren e'
    
  2. or download this
    c:\@Work\Perl>perl -wMstrict -le
    "use 5.014;
    ...
     print qq{'$xlt'};
    "
    'a l_curly b r_curly c l_paren d r_paren e l_curlyl_curlyFr_curlyr_cur
    +ly l_parenl_parenGr_parenr_paren'
    
  3. or download this
    c:\@Work\Perl>perl -wMstrict -le
    "print qq{Perl version $] };
    ...
    "
    Perl version 5.008009
    'a l_curly b r_curly c l_paren d r_paren e l_curlyl_curlyFr_curlyr_cur
    +ly l_parenl_parenGr_parenr_paren'