diff options
Diffstat (limited to 'bin/find-urls')
-rwxr-xr-x | bin/find-urls | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/bin/find-urls b/bin/find-urls new file mode 100755 index 0000000..e41363a --- /dev/null +++ b/bin/find-urls @@ -0,0 +1,8 @@ +#!/usr/bin/env perl +use strict; +use warnings; +use 5.014; + +use URL::Search 'extract_urls'; + +say for extract_urls(do { local $/; <> }); |