my $x = chr(0); $x x= 500e6;