use strict;
use Scrap::Foo;
use Data::Dumper;
my $dummy = Scrap::Foo::bar();
print Dumper $dummy;