The result is

. $variable"; ?> #!/usr/bin/perl #################### sub perl_Subroutine{ #################### my $self = shift; (if I passing something to this function/method of course). my $result; $result = $self + 2; return $result; }