diff options
author | lookshe <lookshe@fumuga.com> | 2014-07-01 11:56:22 +0200 |
---|---|---|
committer | lookshe <lookshe@fumuga.com> | 2014-07-01 11:56:22 +0200 |
commit | 3ffde91c79f247a205efd3d8b7c85c28a74a6e94 (patch) | |
tree | 457de1f432f63e81c675ab345f5c796e4b740b27 | |
parent | c5e05d88d4c175ef318d538473a7e0f438ef76c3 (diff) |
typo in regex
-rw-r--r-- | firstseen.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/firstseen.pl b/firstseen.pl index 7d8f3b6..998836b 100644 --- a/firstseen.pl +++ b/firstseen.pl @@ -38,7 +38,7 @@ foreach $line (<file>) { if ($line =~ m/^\[00:00(:00)?\] --- /){ ($date=$line)=~s/^\[00:00(:00)?\] --- (.*)\n/$2/; } - if ($line =~ m/^\[[0-9]{2}:[0-9]{2}(:[0-]{2})?\] Nick change: .* -> $snick/i) { + if ($line =~ m/^\[[0-9]{2}:[0-9]{2}(:[0-9]{2})?\] Nick change: .* -> $snick/i) { ($newnick=$line)=~s/.* Nick change: (.*) -> $snick\n/$1/i; print "$nick was $newnick\n"; exec($^X, $0, $folder, $chan, $newnick); |