Help for this page

Select Code to Download


  1. or download this
    my @data1 = grep length, map {chomp; $_} <$in1>;