Ralf's Perl script is old and not very general - it does not work on old GTFs. Should we substitute it?