Commit Diff


commit - 1059e91b681172044c1b511ae85d2f0e4f252f7a
commit + 82224691dcb4f7411d9fb2868b46b9e03af9a5b2
blob - 74e58b8246fcbac81526b3ddb0392348f0e5d5a0
blob + dbbf37eee4e373bfcecd6356568e75ae3a5e59ac
--- mailread.pl
+++ mailread.pl
@@ -11,10 +11,13 @@ run3(['lynx', '-dump', '-force_html', '-stdin'], \$bod
 open(my $fh, '>', "$ENV{HOME}/.maillinks");
 my $i = 0;
 $body =~ s{(https?://[^\s<>"]+)}{
-	if (length($1) > 80) {
+	if (length($1) > 80)
+	{
 		print $fh "$1\n";
 		"[Link #" . ++$i . "]";
-	} else {
+	}
+	else
+	{
 		$1;
 	}
 }gex;