@routes=grep /$line/, @ {$rec->{'ADV'}};