Lines Matching refs:stmt
1560 my ($stmt) = @_;
1563 $stmt =~ s/(^|\n)./$1/g;
1564 $stmt =~ s/^\s*//;
1565 $stmt =~ s/\s*$//;
1567 my @stmt_lines = ($stmt =~ /\n/g);
1573 my ($stmt) = @_;
1575 my @stmt_lines = ($stmt =~ /\n/g);
1581 my ($stmt) = @_;
1583 $stmt =~ s/(^|\n)./$1/g;
1584 $stmt =~ s/^\s*{//;
1585 $stmt =~ s/}\s*$//;
1586 $stmt =~ s/^\s*//;
1587 $stmt =~ s/\s*$//;
1589 my @stmt_lines = ($stmt =~ /\n/g);
1590 my @stmt_statements = ($stmt =~ /;/g);