my $number = '0234';
$number %= 100;
print $number;

34