#!/usr/bin/env perl

use WWW::LongURL;
use strict;
use warnings;

our $VERSION = '0.01';

my $shorturl = shift;

my $expander  = WWW::LongURL->new();
my $longerurl = $expander->expand($shorturl);
print $longerurl, "\n";
