$countline++ if +(split)[0] eq "Hello";