Multiple variables for 'my' need to be in parenthesis

perl -wc reported:

Parentheses missing around "my" list at sims.pl line 9.
Useless use of a variable in void context at sims.pl line 9.
Useless use of a variable in void context at sims.pl line 9.
Useless use of a variable in void context at sims.pl line 9.
Useless use of a variable in void context at sims.pl line 9.
Name "main::doonly" used only once: possible typo at sims.pl line 9.

-> now it's happy.

Change-Id: I3b3685d6918ddb77e47c58bade931897075c6e04
This commit is contained in:
Thomas Jarosch 2015-01-03 15:25:09 +01:00
parent dd75bb756d
commit 98280bb203

View file

@ -6,7 +6,7 @@ use Cwd;
require "tools/builds.pm";
my $verbose, $strip, $update, $doonly, $version;
my ($verbose, $strip, $update, $doonly, $version);
my @doonly;
my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time());