changeit( 100 );

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