Select Code to Download

use strict;
use warnings;
...

    $last_line_incomplete = $data !~ /\n$/;
}

            print +("=" x 70), "\n"; #what is this?

======================================================================