$var1 = $var2 = $var3 = 0; [download]
$var1 =~ $var2 =~ s/\n/<br>/g; [download]
In reply to Multiple variable assignments with RexExp by blackjudas