Select Code to Download

$H_count ++ and ...

  DB<1> $h++ and print "foo";

  DB<2> $h++ and print "foo";
foo

  DB<3> ++$i  and print "foo";
foo

    $line =~ s/\r//g; # removes windows CR characters 
    $line =~ s/\s+$//; # removes trailing white spaces