last if ( $i =~ /^\s*$/);  # skip lines that are whitespace only