sub test{ my $self=shift; $self->test2("Hola Mundo"); } sub test2{ my ($self,$var1,$var2) = _@ print $self; print $var1; print $var2; }
Standard input is empty
===SORRY!=== Unsupported use of -> as postfix; in Perl 6 please use either . to call a method, or whitespace to delimit a pointy block at line 4, near "test2(\"Hol"
Standard output is empty
The brand new service which powers Ideone!
Widget for compiling and running the source code in a web browser!