Overview of program 

#!/usr/bin/perl
use strict;

use Parser;
use Data::Dumper;

my $address = shift;
my $parsed = Parser->parse_address($address);
print Dumper($parsed);