use strict;
use warnings;
use v5.10;

our $_cached;
sub somefunc
{
   $_cached //= do {
     say "Heavy calculations";
     42+($ARGV[0]||0);
   };
}

say somefunc();
say somefunc();
__END__
Heavy calculations
42
42