romenskiy2012/curl
1
0
Fork 0
mirror of https://github.com/curl/curl.git synced 2026-08-01 13:58:39 +03:00
Code Issues Projects Releases Packages Wiki Activity

scripts: drop redundant double-quotes: "$var" -> $var (Perl)

Browse source 
Closes #21009
This commit is contained in:
Viktor Szakats 2026-03-19 01:15:43 +01:00
parent f45bf74b5a
commit d5014a2b95
No known key found for this signature in database
33 changed files with 161 additions and 161 deletions
Download patch file Download diff file Expand all files Collapse all files

8
tests/sshhelp.pm
View file

@ -177,9 +177,9 @@ sub dump_array {
sub display_file {
my $filename = $_[0];
print "=== Start of file $filename\n";
if(open(my $displayfh, "<", "$filename")) {
if(open(my $displayfh, "<", $filename)) {
while(my $line = <$displayfh>) {
print "$line";
print $line;
}
close $displayfh;
}
@ -192,9 +192,9 @@ sub display_file {
sub display_file_top {
my $filename = $_[0];
print "=== Top of file $filename\n";
if(open(my $displayfh, "<", "$filename")) {
if(open(my $displayfh, "<", $filename)) {
my $line = <$displayfh>;
print "$line";
print $line;
close $displayfh;
}
print "=== End of file $filename\n";