in reply to Re: Call Subroutine with Variablein thread Call Subroutine with Variable
BEGIN { package Foo; sub new { return bless {}, shift } sub method { my( $self, $what ) = @_; print "AIX goes $what\n"; } } my $obj = Foo->new; $obj->method('the what'); __END__ AIX goes the what [download]