Hello saro and welcome to the monastery and to the wonderful world of Perl!

to make a program you must have a plain solution to then translate it into a program. Let's see:

open a file named DATA.TXT
read all lines of this file
if the string 'NINE' is found save the whole string for later use
   -or (not clear in your question)-
if the string 'NINE' is found split this string into 8 parts
close the file
print the result
[download]

useful reads:

• https://perldoc.perl.org/perlintro.html
• https://perldoc.perl.org/perlopentut.html especially this part
• while or foreach to cycle the file (always in perlintro)
• chomp to remove the newline while reading
• conditional loop inside perlintro
• basics regexes inside perlintro

Try some code on your own and post your code and questions here.

Dont forget to start your program with:

use strict;
use warnings;
[download]

You can also add use diagnostics; after the above lines to get more help from Perl itself

L*