Select Code to Download

foreach $page (@files) {
     chomp $page;
     $page =~ s/\r//g;
     # ...
}

<c>foreach $page (@files) {
     $page =~ s/[\r\n]//g;
     # ...
}