Select Code to Download

use strict;
use warnings;
...
{
      printf "Garbage found: \"%s\" \n",$line;
}

use Data::Dumper;
$Data::Dumper::Useqq = 1;
print Dumper $line;