You could use syswrite

my $val = 10;

open my $fh, ">", "text.out" or die $!;
syswrite $fh, $val;
[download]