use strict;
use SOAP::Lite;
use Data::Dumper;

my $uri = "Optional URI";
my $proxy = "HTTPS:";

# <== insert print statement here to inspect $uri and $proxy
print "URI = [$uri], PROXY = [$proxy]\n";

my $soap = SOAP::Lite->new(
  uri => ($uri || 'Some URI'),
  proxy => ($proxy || 'HTTP:')
  );

print Dumper($soap);