open (FILE,"file.txt");
while (my $data = <FILE>) {
  chomp($data);
  print ("$data\n");
  sleep 60 if $. % 10 == 0;
}
close(FILE);