print STDOUT do {(my $tmp = <<EOT) =~ s/^#//mg; $tmp }; #this is #a test EOT [download]
In reply to Re: Problems with pod parsing by runrig in thread Problems with pod parsing by brianarn