Opened by bianca at 2009-10-10 12:31
User since
2009-09-13
7016 Artikel
BenutzerIn
2009-09-13
7016 Artikel
BenutzerIn
Nicht ganz...
Es meckert noch immer auf STDOUT, habe bewußt ein x an den Modulnamen gehängt um einen Fehler zu provozieren:
$@ bleibt leer, stattdessen Gemecker auf STDOUT, was ich nicht will.
Es meckert noch immer auf STDOUT, habe bewußt ein x an den Modulnamen gehängt um einen Fehler zu provozieren:
Code (perl): (dl
)
1 2 3 4 5 6 7 8 9 10
#!/usr/bin/perl -w use strict; use warnings; BEGIN { eval "use Win32::Filex qw/ ARCHIVE /" } if (!$@) { Win32::File->import('ARCHIVE'); my $test = Win32::File::GetAttributes ("eval.pl",ARCHIVE); print "test: >$test<\n"; } else { print "Schrott: >$@<\n" }
$@ bleibt leer, stattdessen Gemecker auf STDOUT, was ich nicht will.
10 print "Hallo"
20 goto 10
20 goto 10