diff options
| author | Gurusamy Sarathy <gsar@cpan.org> | 1999-02-16 04:09:47 +0000 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 1999-02-16 04:09:47 +0000 |
| commit | cceca5ed003bac658cb0392a14bb2f26d434bd78 (patch) | |
| tree | 286c2340276a7cbefe1899f0f01767791bb31ea4 /x2p | |
| parent | a9fb271febef206f32659f8abc5f9029ae2f7a25 (diff) | |
| download | perl-cceca5ed003bac658cb0392a14bb2f26d434bd78.tar.gz | |
propagate PERL_VERSION everywhere, add to pod
p4raw-id: //depot/perl@2957
Diffstat (limited to 'x2p')
| -rw-r--r-- | x2p/a2py.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/x2p/a2py.c b/x2p/a2py.c index cb09fce485..3976c860c5 100644 --- a/x2p/a2py.c +++ b/x2p/a2py.c @@ -35,7 +35,7 @@ static void usage(void); static void usage() { - printf("\nThis is the AWK to PERL translator, version 5.0, patchlevel %d\n", PATCHLEVEL); + printf("\nThis is the AWK to PERL translator, revision %d.0, version %d\n", PERL_REVISION, PERL_VERSION); printf("\nUsage: %s [-D<number>] [-F<char>] [-n<fieldlist>] [-<number>] filename\n", myname); printf("\n -D<number> sets debugging flags." "\n -F<character> the awk script to translate is always invoked with" |