use strict;
use warnings;
open my $fh, "<", $path or die "Konnte $path nicht öffnen: $!";
while(my $line=<$fh>)
{
  print $line if($.==9);
  print $line if($.==10);

  last if($.>10);
}