Select Code to Download

my $p = HTML::TokeParser::Simple->new(\$html);
my (%href, $this_href, $number, $letter);
...
  }
  
}

---------- Capture Output ----------
> "C:\Perl\bin\perl.exe" _new.pl
...
    pdf\6c0a5bb4-143d-4305-957b-796c8193d07a.pdf -> 116815754

> Terminated with exit code 0..