#!/usr/bin/perl
use strict;
use warnings;
use LWP::Simple;

my $url = "URL";
my $file = "BCM_console.exe";
my $code = getstore($url, "$file");
die "Error: $code on $url" unless is_success($code);