Help for this page

Select Code to Download


  1. or download this
    c:\@Work\Perl\monks>perl -wMstrict -MData::Dump -le
    "my @ra = (1, 1, 1, 2, 3, 4, 4, 4, 5, 6, 1, 1, 1);
    ...
    [1, 1, 1 .. 4, 4, 4, 5, 6, 1, 1, 1]
    
    [1, 1, 1 .. 4, 4, 4, 5, 6, 1]
    
  2. or download this
    c:\@Work\Perl\monks>perl -wMstrict -MData::Dump -le
    "my @ra = (1, 1, 1, 2, 3, 4, 4, 4, 5, 6, 1, 1, 1);
    ...
    [1, 1, 1 .. 4, 4, 4, 5, 6, 1, 1, 1]
    
    [1, 1, 1 .. 4, 4, 4, 5, 6, 1]