use Inline Java => <<'END', AUTOSTUDY => 1 ; import java.util.* ; class Pod_10 { public Pod_10(){ } public HashMap get_hm(){ HashMap hm = new HashMap() ; return hm ; } } END my $obj = new Pod_10() ; my $hm = $obj->get_hm() ; $hm->put("key", "value") ; my $val = $hm->get("key") ; print($val . "\n") ; # prints value