1 files changed, 14 insertions, 0 deletions
diff --git a/journal/pull_url_from_journal.pl b/journal/pull_url_from_journal.pl
new file mode 100755
index 0000000..66941cf
--- /dev/null
+++ b/journal/pull_url_from_journal.pl
@@ -0,0 +1,14 @@
+#!/usr/bin/env perl
+
+use warnings;
+use strict;
+
+my $journal = "/home/lemon/Notes/journal";
+
+my $line = `grep -R $ARGV[0] $journal | cut -f3- -d' '| fzf `;
+chomp $line;
+
+if ($line =~ m/(http.*)/) {
+    print $1;
+    # system('qutebrowser', $1);
+}