exit: zahada
Honza Pazdziora
adelton na informatics.muni.cz
Čtvrtek Leden 30 17:43:39 MET 2003
On Thu, Jan 30, 2003 at 05:04:22PM +0100, Jiri Polcar wrote:
> Zdravim,
>
> prave jsem se potkal ze zahadou. Spript vesele pokracuje i po volani fce
> exit():
>
> ---cite---
> #!/usr/bin/perl -w
>
> if ( doCommand ('eeeecho pepa') ) {
> print "Podminka splnena\n";
> } else {
> print "Podminka NEsplnena\n";
> }
[...]
> sub doCommand {
> my ( $co ) = @_;
>
> {
> local $SIG{__WARN__} = sub { die @_ };
> eval { system $co };
> }
>
> if ( $@ ) {
> print STDERR "$0: ERROR: Cannot run: $co\n";
> exit 1;
> }
>
> print "OK\n";
>
> return 1;
> }
> ---cite---
>
> predpokladam, ze neco co by se dalo pustit se nejmenuje 'eeeecho'. Zde
> posilam jeste vystup:
>
>
> ---cite---
> ./t41.pl: ERROR: Cannot run: eeeecho pepa
> OK
> Podminka splnena
> KONEC
> ---cite---
>
> Muze me nekdo vysvetlit, tak to, ze fce exit() neukonci beh skriptu?
Protoze se nevola. Co Vas vede k presvedceni, ze ten system selze? Ten
system se vrati s uspechem.
--
------------------------------------------------------------------------
Honza Pazdziora | adelton na fi.muni.cz | http://www.fi.muni.cz/~adelton/
... all of these signs saying sorry but we're closed ...
------------------------------------------------------------------------
Další informace o konferenci Perl