if( $line_number == 5 ){
  print "Line $line_number contains this text:\n", $_, "\n";
}