Help for this page
while ($line = <STDIN>){ if ($line =~ /t/){ print "hi"; } }
while ($line = <STDIN>){ if ($line =~ /te/){ print "hi"; } }