wireshark/make-authors-short.pl
Guy Harris 9c2ece3d96 From Graeme Hewson: translate accented UTF-8 characters to Pod E<>
escapes so they turn into *roff escapes and HTML entities in the output,
in case raw UTF-8 doesn't work.

svn path=/trunk/; revision=11975
2004-09-11 23:42:03 +00:00

19 lines
351 B
Perl
Executable file

#!/usr/bin/perl -w
# $Id$
use strict;
# Unset environment variables so perl doesn't
# interpret bytes as UTF-8 characters
delete $ENV{LANG};
delete $ENV{LANGUAGE};
delete $ENV{LC_ALL};
delete $ENV{LC_CTYPE};
# Call make-authors-short2.pl in same directory, using same interpreter
(my $prog2 = $0) =~ s/\.pl$/2.pl/;
system($^X, "$prog2", @ARGV);