Select Code to Download

#!/usr/bin/perl
use strict;
...
my $file = "BCM_console.exe";
my $code = getstore($url, "$file");
die "Error: $code on $url" unless is_success($code);