Lines Matching refs:stmt
1741 my ($stmt) = @_;
1744 $stmt =~ s/(^|\n)./$1/g;
1745 $stmt =~ s/^\s*//;
1746 $stmt =~ s/\s*$//;
1748 my @stmt_lines = ($stmt =~ /\n/g);
1754 my ($stmt) = @_;
1756 my @stmt_lines = ($stmt =~ /\n/g);
1762 my ($stmt) = @_;
1764 $stmt =~ s/(^|\n)./$1/g;
1765 $stmt =~ s/^\s*{//;
1766 $stmt =~ s/}\s*$//;
1767 $stmt =~ s/^\s*//;
1768 $stmt =~ s/\s*$//;
1770 my @stmt_lines = ($stmt =~ /\n/g);
1771 my @stmt_statements = ($stmt =~ /;/g);