my $num = 0;
binmode; ( Thanks to anonymonk for pointing out my mistake)
open OUTPUT, ">filepart".$num
# print your information here
close OUTPUT;