Select Code to Download

    if ($volume =~ $vol_to_parse) {

    if ($volume =~ /$vol_to_parse/) {

print "Using: "."vol: $vol_to_parse". " and " . "file: $file_to_parse"
+ . "\n";

print "Using: vol: $vol_to_parse and file: $file_to_parse\n";

    open(DAT, "<", $file_to_parse) || die "Could not open file! ($!)\n
+";

#!/usr/bin/perl

...
        }
    }
}