Thread Routinen erzeugen (18 answers)
Opened by bloonix at 2007-01-30 16:53

bloonix
 2007-02-01 10:30
#73852 #73852
User since
2005-12-17
1615 Artikel
HausmeisterIn
[Homepage]
user image
Hallo betterworld,

[quote=betterworld,31.01.2007, 17:59]Beim obigen Beispiel von bloonix hat z. B. der ganze BEGIN-Block kein strict refs.[/quote]
Wer ist denn bloonix? :p

Es stimmt aber... ich könnte 'refs' noch ein Stück einschränken... ist auch
schon geschehen. =)

[quote=betterworld,31.01.2007, 17:59]Und ich persoenlich bevorzuge es eigentlich immer, wenn man eine strict-konforme Loesung findet.  Da muss man dann auch keine Kunststuecke machen, um "no strict" fuer einen moeglichst kleinen Teil des Blockes wirken zu lassen.[/quote]
Stimmt. Man sollte immer eine strict-konforme Lösung suchen, aber ich
finde es auch nicht so arg schlimm, wenn man strict mal teilweise aus-
schaltet. Es ist auch nicht unnormal:

5.8/B/Bytecode.pm:          no strict 'refs';
5.8/B/C.pm:    no strict 'refs';
5.8/B/C.pm:      no strict 'refs';
5.8/B/C.pm:                no strict 'refs';
5.8/B/C.pm:   no strict 'refs';
5.8/B/C.pm: no strict qw(vars refs);
5.8/B/C.pm: no strict 'vars';
5.8/B/C.pm: no strict qw(refs);
5.8/B/CC.pm:    no strict 'refs';
5.8/B/Concise.pm:                   no strict 'refs';
5.8/B/Deparse.pm:       no strict 'refs';
5.8/B/Deparse.pm:       no strict 'refs';
5.8/B/Deparse.pm:       no strict 'refs';
5.8/B/Lint.pm:      no strict 'refs';
5.8/B/Lint.pm:    no strict qw(vars refs);
5.8/B/Showlex.pm:               no strict 'refs';
5.8/B/Xref.pm:      no strict 'refs';
5.8/B/Xref.pm:    no strict qw(vars refs);
5.8/Encode/Guess.pm:    no strict 'refs';
5.8/I18N/Langinfo.pm:   no strict 'refs';
5.8/IO/Handle.pm:    no strict 'refs';
5.8/Sys/Syslog.pm:    no strict 'refs';
5.8/Sys/Syslog.pm:    my $value = eval { no strict 'refs'; &$name };
5.8/Sys/Syslog.pm:      no strict 'refs';
5.8/Time/HiRes.pm:      no strict 'refs';
5.8/B.pm:    no strict 'refs';
5.8/Config.pm:    no strict 'refs';
5.8/Cwd.pm:    no strict 'refs';
5.8/DB_File.pm:    no strict 'refs';
5.8/Errno.pm:   no strict 'refs';
5.8/GDBM_File.pm:    no strict 'refs';
5.8/Safe.pm:    no strict 'refs';
5.8/Safe.pm:    no strict 'refs';
5.8/Safe.pm:    no strict 'refs';
5.8/encoding.pm:            no strict 'refs';
5.8.7/B/Bytecode.pm:        no strict 'refs';
5.8.7/B/C.pm:    no strict 'refs';
5.8.7/B/C.pm:    no strict 'refs';
5.8.7/B/C.pm:                no strict 'refs';
5.8.7/B/C.pm:   no strict 'refs';
5.8.7/B/C.pm: no strict qw(vars refs);
5.8.7/B/C.pm: no strict 'vars';
5.8.7/B/C.pm: no strict qw(refs);
5.8.7/B/CC.pm:    no strict 'refs';
5.8.7/B/Concise.pm:                 no strict 'refs';
5.8.7/B/Deparse.pm:     no strict 'refs';
5.8.7/B/Deparse.pm:     no strict 'refs';
5.8.7/B/Deparse.pm:     no strict 'refs';
5.8.7/B/Lint.pm:            no strict 'refs';
5.8.7/B/Lint.pm:    no strict qw(vars refs);
5.8.7/B/Showlex.pm:             no strict 'refs';
5.8.7/B/Xref.pm:            no strict 'refs';
5.8.7/B/Xref.pm:    no strict qw(vars refs);
5.8.7/Encode/Guess.pm:  no strict 'refs';
5.8.7/I18N/Langinfo.pm: no strict 'refs';
5.8.7/IO/Handle.pm:    no strict 'refs';
5.8.7/Sys/Syslog.pm:    no strict 'refs';
5.8.7/Sys/Syslog.pm:    my $value = eval { no strict 'refs'; &$name };
5.8.7/Sys/Syslog.pm:    no strict 'refs';
5.8.7/Time/HiRes.pm:    no strict 'refs';
5.8.7/B.pm:    no strict 'refs';
5.8.7/Config.pm:    no strict 'refs';
5.8.7/Cwd.pm:    no strict 'refs';
5.8.7/DB_File.pm:    no strict 'refs';
5.8.7/Errno.pm: no strict 'refs';
5.8.7/GDBM_File.pm:    no strict 'refs';
5.8.7/Safe.pm:    no strict 'refs';
5.8.7/Safe.pm:    no strict 'refs';
5.8.7/Safe.pm:    no strict 'refs';
5.8.7/encoding.pm:          no strict 'refs';
Compress/Zlib.pm:    no strict 'refs';
Crypt/SSLeay/MainContext.pm:        no strict 'refs';
DBD/File.pm:    no strict qw(refs);
DBD/ExampleP.pm:            no strict 'refs';
DBD/ExampleP.pm:    use strict; no strict 'refs'; # cause problems with filehandles
DBI/PurePerl.pm:    no strict qw(refs);
DBI/DBD/Metadata.pm:        no strict 'refs';
DBI.pm:  no strict;
DBI.pm: no strict 'refs';
DBI.pm:     no strict 'refs';
DBI.pm: no strict 'refs';
DBI.pm: no strict 'refs';
DBI.pm:     no strict 'refs';
DBI.pm:    no strict 'refs';
DBI.pm: no strict 'refs';
Glib.pm:no strict qw(refs);
Irssi.pm:  no strict 'refs';
Irssi.pm:  no strict 'refs';
Irssi.pm:  no strict 'refs';
Mysql/Statement.pm:    no strict;
Mysql.pm:           no strict 'refs';
Net/SSLeay/Handle.pm:    no strict 'refs';
silc-client/Irssi.pm:  no strict 'refs';
silc-client/Irssi.pm:  no strict 'refs';
silc-client/Irssi.pm:  no strict 'refs';
\n\n

<!--EDIT|opi|1170318812-->
What is a good module? That's hard to say.
What is good code? That's also hard to say.
One man's Thing of Beauty is another's man's Evil Hack.

View full thread Routinen erzeugen