foreach $line ( @data )