我问得是怎么用啊 ， 安装好了， command找不到psh use psh ?
我记得像shell一样的东西 On 2/13/09, xie yu <[email protected]> wrote: > > ppm 安装psh，可以用 5.8.9的 > > 2009/2/13 Michael Zeng <[email protected]> > >> 不能运行，大哥 >> >> >> hello world都 退出 >> >> >> >> On 2/13/09, Shu Cho <[email protected]> wrote: >>> >>> >>> 把我刚才贴的复制过去存成psh.bat >>> >>> 2009/2/13 Michael Zeng <[email protected]>: >>> > 我没有这个psh.bat 文件啊 >>> > >>> > >>> > >>> > On 2/13/09, Shu Cho <[email protected]> wrote: >>> >> >>> >> ---8<--- psh.bat >>> >> @rem = '--*-Perl-*-- >>> >> @echo off >>> >> if "%OS%" == "Windows_NT" goto WinNT >>> >> perl -x -S "%0" %1 %2 %3 %4 %5 %6 %7 %8 %9 >>> >> goto endofperl >>> >> :WinNT >>> >> perl -x -S %0 %* >>> >> if NOT "%COMSPEC%" == "%SystemRoot%\system32\cmd.exe" goto endofperl >>> >> if %errorlevel% == 9009 echo You do not have Perl in your PATH. >>> >> if errorlevel 1 goto script_failed_so_exit_with_non_zero_val 2>nul >>> >> goto endofperl >>> >> @rem '; >>> >> #! /usr/bin/perl >>> >> #line 15 >>> >> # >>> >> # psh - Perl Shell >>> >> # >>> >> # Copyright (C) 1999-2003 Gregor N. Purdy. All rights reserved. >>> >> # This script is free software. It may be copied or modified according >>> >> # to the same terms as Perl itself. >>> >> # >>> >> >>> >> package Psh; # still use a package so getopt etc. is not imported into >>> >> # the shell namespace >>> >> >>> >> use Psh; >>> >> require Psh::Locale; >>> >> require Psh::Util; >>> >> >>> >> # >>> >> # Parse the command line and deal with the options except -r, which is >>> >> # handled in the MAIN program below. We do this part very early in >>> this >>> >> # file so that the results apply to all the setting up we do before >>> the >>> >> # MAIN program. >>> >> # >>> >> # option -i is ignored >>> >> >>> >> @Psh::origi...@inc; # save it >>> >> >>> >> my %opt=(); >>> >> >>> >> if (@ARGV) { >>> >> require Getopt::Std; >>> >> Getopt::Std::getopts('Fiwrd:f:c:', \%opt); >>> >> >>> >> if ($opt{'r'}) { >>> >> Psh::Util::print_error_i18n('no_r_flag'); >>> >> exit 1; >>> >> } >>> >> >>> >> # >>> >> # -w is "warnings mode": >>> >> # >>> >> >>> >> if ($opt{'w'}) { >>> >> Psh::Util::print_out_i18n('simulate_perl_w'); >>> >> $^W = 1; >>> >> use strict; >>> >> } >>> >> >>> >> # >>> >> # -d is "debug mode": >>> >> # >>> >> >>> >> if (exists($opt{'d'})) { $Psh::debugging = $opt{'d'}||'soie'; } >>> >> else { $Psh::debugging = 0; } >>> >> } >>> >> >>> >> Psh::Util::print_debug("Debugging!\n"); >>> >> >>> >> Psh::minimal_initialize; >>> >> Psh::process_rc($opt{'f'}) unless $opt{'F'}; >>> >> Psh::finish_initialize; >>> >> >>> >> # TODO: Is this implementation equivalent to sh's ? >>> >> if($opt{'c'}) { >>> >> Psh::evl($opt{'c'}); >>> >> exit 0; >>> >> } >>> >> >>> >> if (@ARGV) { >>> >> Psh::process_args; >>> >> } else { >>> >> Psh::initialize_interactive_mode; >>> >> while (1) { >>> >> eval { Psh::main_loop; }; >>> >> Psh::handle_message($@,'main_loop'); >>> >> } >>> >> } >>> >> >>> >> exit 0; >>> >> >>> >> __END__ >>> >> :endofperl >>> >> --->8--- psh.bat >>> >> >>> >> 2009/2/13 Michael Zeng <[email protected]>: >>> >> > 我那个目录里面没有psh啊， 怪不得起不来 >>> >> > >>> >> > 那怎么用呢 >>> >> > win32 下 >>> >> > >>> >> > >>> >> > On 2/13/09, Shu Cho <[email protected]> wrote: >>> >> >> >>> >> >> 我是用strawberry装的。有个psh.bat的文件会安装在和perl.exe那个目录里面 >>> >> >> >>> >> >> 2009/2/13 Michael Zeng <[email protected]>: >>> >> >> > 上次看到joe在用psh挺好的 >>> >> >> > >>> >> >> > 我用activerperl 的ppm安装了psh， 可是怎么用啊 >>> >> >> > >>> >> >> > 在command 里面 打psh，说command not found >>> >> >> > >>> >> >> > >>> >> >> > -- >>> >> >> > Yours Sincerely >>> >> >> > Zeng Hong >>> >> >> > > >>> >> >> > >>> >> >> >> >>> >> > >>> >> >> >>> > >>> >>> >>> -- >>> Yours Sincerely >>> Zeng Hong >>> >>> > > > > -- Yours Sincerely Zeng Hong --~--~---------~--~----~------------~-------~--~----~ 您收到此信息是由于您订阅了 Google 论坛“PerlChina Mongers 讨论组”论坛。 要在此论坛发帖，请发电子邮件到 [email protected] 要退订此论坛，请发邮件至 [email protected] 更多选项，请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问该论坛 -~----------~----~----~----~------~----~------~--~---
