mirror of
https://github.com/curl/curl.git
synced 2026-07-24 22:27:17 +03:00
tidy-up: whitespace (more in Perl)
Follow-up to 8eab2b7086 #17896
Cherry-picked from #17877
Closes #17901
This commit is contained in:
parent
8eab2b7086
commit
ddcfd2d511
43 changed files with 84 additions and 98 deletions
|
|
@ -44,7 +44,7 @@ const unsigned char ${varname}[] = {
|
|||
HEAD
|
||||
;
|
||||
|
||||
while (<STDIN>) {
|
||||
while(<STDIN>) {
|
||||
my $line = $_;
|
||||
foreach my $n (split //, $line) {
|
||||
my $ord = ord($n);
|
||||
|
|
|
|||
|
|
@ -34,7 +34,7 @@ push @out, " / __| | | | |_) | |\n";
|
|||
push @out, " | (__| |_| | _ <| |___\n";
|
||||
push @out, " \\___|\\___/|_| \\_\\_____|\n";
|
||||
|
||||
while (<STDIN>) {
|
||||
while(<STDIN>) {
|
||||
my $line = $_;
|
||||
push @out, $line;
|
||||
}
|
||||
|
|
@ -58,7 +58,7 @@ if($c) {
|
|||
IO::Compress::Gzip->import();
|
||||
1;
|
||||
};
|
||||
print STDERR "Warning: compression requested but Gzip is not available\n" if (!$c)
|
||||
print STDERR "Warning: compression requested but Gzip is not available\n" if(!$c)
|
||||
}
|
||||
|
||||
if($c)
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue