Otra opción... es la de que no exista el shell... arrancas tu programa Perl y te quedas en un bucle sin fin. Construimos este bucle:
Using perl Syntax Highlighting
- #!/usr/bin/perl
- use strict;
- use warnings;
- use diagnostics;
- my $comando;
- do {
- print "$ENV{PWD}> ";
- $comando = <>;
- chomp $comando;
- @ARGV = split " ", $comando;
- print scalar(@ARGV), ":[@ARGV]\n";
- } while ($comando ne 'exit');
- __END__
Coloreado en 0.004 segundos, usando GeSHi 1.0.8.4
Eso sí... es hacer un poco de trampa... pero no se me ocurren más ideas para evitar el procesado por parte del shell.
