$word =~ /^(\d)\st=(\S+)/; next if ($1 == 0); print "$2\n";