#!/bin/sh

eval "exec /opt/perl/bin/perl -I`dirname $0` -e 'require q!base!; main ()' $*"  
    if $running_under_some_shell;
    
package main;

sub main {
    print "Hello from main\n";
}
 
1;