diff options
author | Matteo Baccan <matteo.baccan@gmail.com> | 2022-04-14 13:06:32 +0200 |
---|---|---|
committer | Daniel Gustafsson <daniel@yesql.se> | 2022-04-14 13:55:32 +0200 |
commit | 0a6eebfc1435f6e3b37c0081550c7742312831d2 (patch) | |
tree | dc07b22fd85a3faac08d490472345494d19cf33f | |
parent | b7c0bd68ffc0778ce0440439ac317da5a0765931 (diff) | |
download | curl-0a6eebfc1435f6e3b37c0081550c7742312831d2.tar.gz |
perl: removed a double semicolon at end of line
Remove double semicolons at end of line in Perl code.
Closes: #8709
Reviewed-by: Daniel Gustafsson <daniel@yesql.se>
-rwxr-xr-x | scripts/ciconfig.pl | 2 | ||||
-rwxr-xr-x | scripts/cijobs.pl | 12 | ||||
-rwxr-xr-x | tests/runtests.pl | 2 |
3 files changed, 8 insertions, 8 deletions
diff --git a/scripts/ciconfig.pl b/scripts/ciconfig.pl index 0d235b71b..ed7767cb9 100755 --- a/scripts/ciconfig.pl +++ b/scripts/ciconfig.pl @@ -164,7 +164,7 @@ print "Never used configure options\n"; for my $w (sort keys %avail) { if(!$used{$w}) { printf " %s%s\n", $w, - $defaulton{$w} ? " (auto)":"";; + $defaulton{$w} ? " (auto)":""; } } diff --git a/scripts/cijobs.pl b/scripts/cijobs.pl index a262cc232..38189d75a 100755 --- a/scripts/cijobs.pl +++ b/scripts/cijobs.pl @@ -248,22 +248,22 @@ sub appveyor { $job{'config'} = $1; } elsif($_ =~ /^ OPENSSL: (.*)/) { - $job{'openssl'} = $1 eq "ON" ? "true": "false";; + $job{'openssl'} = $1 eq "ON" ? "true": "false"; } elsif($_ =~ /^ SCHANNEL: (.*)/) { - $job{'schannel'} = $1 eq "ON" ? "true": "false";; + $job{'schannel'} = $1 eq "ON" ? "true": "false"; } elsif($_ =~ /^ ENABLE_UNICODE: (.*)/) { - $job{'unicode'} = $1 eq "ON" ? "true": "false";; + $job{'unicode'} = $1 eq "ON" ? "true": "false"; } elsif($_ =~ /^ HTTP_ONLY: (.*)/) { - $job{'http-only'} = $1 eq "ON" ? "true": "false";; + $job{'http-only'} = $1 eq "ON" ? "true": "false"; } elsif($_ =~ /^ TESTING: (.*)/) { - $job{'testing'} = $1 eq "ON" ? "true": "false";; + $job{'testing'} = $1 eq "ON" ? "true": "false"; } elsif($_ =~ /^ SHARED: (.*)/) { - $job{'shared'} = $1 eq "ON" ? "true": "false";; + $job{'shared'} = $1 eq "ON" ? "true": "false"; } elsif($_ =~ /^ TARGET: \"-A (.*)\"/) { $job{'target'} = $1; diff --git a/tests/runtests.pl b/tests/runtests.pl index 1bacda1f5..624e705a5 100755 --- a/tests/runtests.pl +++ b/tests/runtests.pl @@ -671,7 +671,7 @@ sub torture { my @ttests = (1 .. $count); if($shallow && ($shallow < $count)) { my $discard = scalar(@ttests) - $shallow; - my $percent = sprintf("%.2f%%", $shallow * 100 / scalar(@ttests));; + my $percent = sprintf("%.2f%%", $shallow * 100 / scalar(@ttests)); logmsg " $count functions found, but only fail $shallow ($percent)\n"; while($discard) { my $rm; |