All pastes #25684 Raw Edit

Anonymous

public text v1 · immutable
#25684 ·published 2005-10-16 18:36 UTC
rendered paste body
my $line = ":InitH!inithello@Init-4C8CF975 NICK :InitH123";
$line =~ s/:(.+?)!(.+):(.+?)/\1:\3/;
my ($oldnick, $newnick) = split (/:/, $line, 2);