Schrift
Start · Board · Anwendungen/Programme/Skripte in Perl · Allgemeines zu Perl
[thread]9163[/thread]

Rückgabewert einer Funktion: Funktion "prüfen"



<< >> 4 Einträge, 1 Seite
#Kein Kommentar
 2007-07-06 14:59
#78283 #78283
User since
2007-06-09
575 Artikel
HausmeisterIn
[default_avatar]
hi,

ich hab da mal ne frage.
kann man den rückgabewert einer funktion prüfen, ohne sie auszuführen?

wenn ich also z.B. einen quelltext hätte, der viele funktionen enthält, ob ich prüfen könnte, ob alle funktionen deklariert sind?
Natürlich könnte ich use strict verwenden, aber gibt es da auch eine andere möglichkeit?
Gerade weil wir alle in einem Boot sitzen, sollten wir froh sein, dass nicht alle auf unserer Seite sind
#Kein Kommentar
 2007-07-06 15:02
#78284 #78284
User since
2007-06-09
575 Artikel
HausmeisterIn
[default_avatar]
ah, habe die antwort im forum schon gefunden:

Code: (dl )
1
2
3
4
5
if (defined &test){
 print "yes\n";
}else{
 print "no\n";
}
Gerade weil wir alle in einem Boot sitzen, sollten wir froh sein, dass nicht alle auf unserer Seite sind
renee
 2007-07-06 15:06
#78285 #78285
User since
2003-08-04
14371 Artikel
ModeratorIn
[Homepage] [default_avatar]
Den Rückgabewert kannst Du nicht prüfen...

Wenn Du prüfen willst, ob in einem Modul eine Funktion existiert, kannst Du mit can arbeiten:

Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13

#!/usr/bin/perl

use strict;
use warnings;

print "yes hallo" if Test->can('hallo');
print "yes test" if Test->can('test');

package Test;

sub test{
    1;
}


use strict solltest Du eigentlich immer verwenden...\n\n

<!--EDIT|renee|1183720017-->
OTRS-Erweiterungen (http://feature-addons.de/)
Frankfurt Perlmongers (http://frankfurt.pm/)
--

Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html
Perl-Entwicklung: http://perl-services.de/
#Kein Kommentar
 2007-07-06 15:11
#78286 #78286
User since
2007-06-09
575 Artikel
HausmeisterIn
[default_avatar]
ok, meine frage war ein bisschen falsch gestellt :D

ich wollte eigentlich nur wissen ob eine funktion existiert,
und den fehler vor use strict abfangen.
Gerade weil wir alle in einem Boot sitzen, sollten wir froh sein, dass nicht alle auf unserer Seite sind
<< >> 4 Einträge, 1 Seite



View all threads created 2007-07-06 14:59.