Skip to content

Commit

Permalink
Fixed a pointless regex flag
Browse files Browse the repository at this point in the history
  • Loading branch information
Isaac G committed Mar 13, 2012
1 parent ffef453 commit 7fb9dc8
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion urltitles.pl
Original file line number Diff line number Diff line change
Expand Up @@ -32,7 +32,7 @@ sub message_public {
while ($msg =~ m/\G(\S+)(\s*)/g)
{
($word, $ws) = ($1, $2); # word, whitespace
next unless ($word =~ /^$regex$/g);
next unless ($word =~ /^$regex$/);
$word = "http://$word" unless ( $word =~ qr(^https?://) );

eval{ $response = $ua->get($word) };
Expand Down

0 comments on commit 7fb9dc8

Please sign in to comment.