sub function { return 8 }

my $a = eval(function) / 4;

print $a;