diff options
author | David Golden <dagolden@cpan.org> | 2010-02-11 14:15:10 -0500 |
---|---|---|
committer | David Golden <dagolden@cpan.org> | 2010-02-11 14:15:21 -0500 |
commit | bb87c82accf79d3e15da7fc9b646232a4c2bd47c (patch) | |
tree | aca80cc41a0b717f51bff7030421912a6d28435d /perl.c | |
parent | 2630fd9e8e31d2fd409e2e8ec16dc85d230a3eb3 (diff) | |
download | perl-bb87c82accf79d3e15da7fc9b646232a4c2bd47c.tar.gz |
revert perl -h changes
Diffstat (limited to 'perl.c')
-rw-r--r-- | perl.c | 8 |
1 files changed, 2 insertions, 6 deletions
@@ -2835,11 +2835,11 @@ S_usage(pTHX_ const char *name) /* XXX move this out into a module ? */ "-T enable tainting checks", "-u dump core after parsing program", "-U allow unsafe operations", -"-v print version, patchlevel and license", +"-v print version, subversion (includes VERY IMPORTANT perl info)", "-V[:variable] print configuration summary (or a single Config.pm variable)", "-w enable many useful warnings (RECOMMENDED)", "-W enable all warnings", -"-x[directory] ignore text before #!perl line (optionally cd to directory)", +"-x[directory] strip off text before #!perl line and perhaps cd to directory", "-X disable all warnings", "\n", NULL @@ -2853,10 +2853,6 @@ NULL name); while (*p) PerlIO_printf(PerlIO_stdout(), "\n %s", *p++); - - PerlIO_printf(PerlIO_stdout(), - "Run 'perldoc perl' for more help with Perl.\n\n" - ); } /* convert a string of -D options (or digits) into an int. |