diff options
| author | Nigel Taylor <njtaylor0101@gmail.com> | 2013-01-06 17:21:55 +0000 |
|---|---|---|
| committer | Nigel Taylor <njtaylor0101@gmail.com> | 2013-01-06 17:21:55 +0000 |
| commit | 6c914fb45d7b410e95c9e00185c61176d3d054fc (patch) | |
| tree | 5e5ddf23e81986055e27c6ad8e726d72777b76dd | |
| parent | bf0841b56d9f84212d4ff150c73a02cda87992f7 (diff) | |
| download | get-flash-videos-6c914fb45d7b410e95c9e00185c61176d3d054fc.tar.gz | |
Display the plugin version is present
| -rw-r--r-- | lib/FlashVideo/URLFinder.pm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lib/FlashVideo/URLFinder.pm b/lib/FlashVideo/URLFinder.pm index 8277967..02019a8 100644 --- a/lib/FlashVideo/URLFinder.pm +++ b/lib/FlashVideo/URLFinder.pm @@ -85,7 +85,9 @@ sub _find_package_url { sub _found { my($package, $url) = @_; - info "Using method '" . lc((split /::/, $package)[-1]) . "' for $url"; + my $pv = eval "\$".$package."::VERSION"; + $pv = ' plugin version ' . $pv if $pv; + info "Using method '" . lc((split /::/, $package)[-1]) . "'$pv for $url"; return $package, $url; } |