system() inherits the programs STDOUT. It has no reason to be printing to some other filehandle. You probably want to be using backticks here:

open(FILE, ">/tmp/blah") || die "Can Not Open File\n";
for my $n (1 .. 10) {
  print FILE `ping -c 1 192.168.1.$n`;
}
close (FILE);
[download]

japhy -- Perl and Regex Hacker