Lines Matching refs:line
59 my $line = shift;
60 my $isOnlyWhiteSpace = ($line =~ m/^\s+$/);
61 $pendingEmptyLines .= $line if ($isOnlyWhiteSpace);
67 my ($out, $line) = @_;
69 printPendingEmptyLines($out, $line);
71 print $out $line;
76 my $line = shift;
77 $previousAllowedLine = $line;
83 my $line = shift;
85 if (!($pendingEmptyLines eq "") && !($previousAllowedLine =~ m/{\s*$/) && !($line =~ m/^\s*}/)) {
97 # my $line = shift; # ignoring input argument
