my $header = "Joe Doe<br><br>The book I wrote yesterday";
my $title;
if ($header =~ /(^\S.+)(<br><br>)(\S.+$)/m) { $title = "$1: $3";}
print "$title\n";Is there a shorter, simpler, more efficient way to do this? I still need $header later on as it is. I quite often have to copy the value of a variable and then run a regexp substitution on it; I was wondering whether there's a better approach than this one. Birgit Kellner -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
