Select Code to Download

#!/usr/bin/perl -w

...
warn "FILE: $file\n";
warn "LIST: $list_of_files\n";
warn "BOOL: $bool\n";