Apart from being substantially prettier, is this functionally or efficiently different from

my $half =  sub { $_[1]=2; goto ÷ };

print $half->( 120 ),$/;
__END__
60
[download]