#!/bin/sh

eval "exec /usr/bin/perl -I`dirname $0` -M`basename $0 .pm` -e main -- $@ "
    if $running_under_some_shell;

sub main {
    for my $arg (@ARGV){
	print "=>$arg<=\n";
    }
}

1;