sub processText($$) { my $subParm0ref = \$_[0]; my $subParm1ref = \$_[1]; # Do something .... print $$subParm0ref; print $$subParm1ref; }