Help for this page

Select Code to Download


  1. or download this
    c:\@Work\Perl>perl -wMstrict -MData::Dump -le
"my @lines = ('', ' ', '  ', 'x', ' x', 'x ', ' x ', '  x  ',);
...
 dd \@no_empties;
"
["x", " x", "x ", " x ", "  x  "]
  2. or download this
    c:\@Work\Perl>perl -wMstrict -MData::Dump -le
"my @lines = ('', ' ', '  ', 'x', ' x', 'x ', ' x ', '  x  ',);
...
 dd \@no_empties;
"
["x", " x", "x ", " x ", "  x  "]