可以说把 psh 装在 windows 上面我还真没有尝试过，主要是上键找回历史的功能可能不会正常工作，除非加上 cygwin 的帮助（但是大家都知道不推荐用 cygwin perl）。
所以最好是用 linux 来尝试，哪怕是虚拟机里面的 ubuntu。 apt-get install psh 就好了 然后可以 % psh 2009/2/13 Michael Zeng <[email protected]> > 我问得是怎么用啊 ， 安装好了， 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 >>>> >>>> >> >> >> --~--~---------~--~----~------------~-------~--~----~ 您收到此信息是由于您订阅了 Google 论坛“PerlChina Mongers 讨论组”论坛。 要在此论坛发帖，请发电子邮件到 [email protected] 要退订此论坛，请发邮件至 [email protected] 更多选项，请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问该论坛 -~----------~----~----~----~------~----~------~--~---
