Lines Matching refs:stmt

1829 	my ($stmt) = @_;
1832 	$stmt =~ s/(^|\n)./$1/g;
1833 	$stmt =~ s/^\s*//;
1834 	$stmt =~ s/\s*$//;
1836 	my @stmt_lines = ($stmt =~ /\n/g);
1842 	my ($stmt) = @_;
1844 	my @stmt_lines = ($stmt =~ /\n/g);
1850 	my ($stmt) = @_;
1852 	$stmt =~ s/(^|\n)./$1/g;
1853 	$stmt =~ s/^\s*{//;
1854 	$stmt =~ s/}\s*$//;
1855 	$stmt =~ s/^\s*//;
1856 	$stmt =~ s/\s*$//;
1858 	my @stmt_lines = ($stmt =~ /\n/g);
1859 	my @stmt_statements = ($stmt =~ /;/g);