The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
/*
 * See simple.pl for how this gets called from Perl
 */

public class perljava {
    Callback p;

	/* 
	 * This class gets instantiated by Perl
	 */
    public perljava(Callback p){
        this.p=p;
    }

	/* 
	 * This function gets called by Perl
	 */
    public String doSomeJavaCode(){
        return("Welcome "+
               p.eval("$global_hash->{'name'}")+
               "!\n"
              );
    }
}