use switch;: die Alternative zu if elsif else - #67876 (Allgemeines zu Perl)

renee

2006-07-10 12:04

User since
2003-08-04
14371 Artikel
ModeratorIn

Nein, -w ist global, wirkt sich also auch auf Module aus. use warnings bezieht sich nur auf den aktuellen Namespace!

Test.pm:

Code: (dl )

package Test;

use strict;

sub test{
  my ($string) = @_;
  print $string;
}

1;

Das hier läuft ohne Warnung:
Skript

Code: (dl )

#!/usr/bin/perl

use strict;
use warnings;
use lib qw(.);
use Test;

Test::test();

Das hier gibt ne Warnung aus:
Skript:

Code: (dl )

#!/usr/bin/perl -w

use strict;
use lib qw(.);
use Test;

Test::test();