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