Select Code to Download

my $value = 100;
changeit( $value );
...

__OUTPUT__
101

changeit( 100 );

sub changeit {
    $_[0]++;
}