use strict;
use LWP::Simple;

my $url = "URL";
##die "Couldn't get it!" unless defined $content;

my $file = "BCM_console.exe";

my $code = getstore($url, "$file");

print "CODE : $code\n";