#!/usr/bin/perl

package Runnable;

use Exporter qw/import/;

@EXPORT_OK = qw/do_something/;

sub do_something
{
    return "did something with @_";
}

if ( $0 =~ /Runnable.pm/ ) {
    print do_something( @ARGV ),"\n\n";
}
1;