Help for this page
train times to xyz train times from xyz train times including xyz
if $line =~ /train times ([^to ]|[^from ])+/ { do something with line }