percona/percona-toolkit
1
0
Fork 0
mirror of https://github.com/percona/percona-toolkit.git synced 2025-09-06 04:17:55 +00:00
Code Issues Packages Projects Releases Wiki Activity

Make check-dev-env print Perl version.

Browse Source
This commit is contained in:
Daniel Nichter
2011-08-25 11:54:10 -06:00
parent 0c785d63b2
commit 9492b8dce6
1 changed files with 2 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
util/check-dev-env
View File

@@ -30,6 +30,8 @@ use Test::More;
use Time::HiRes;
use Time::Local;
print `perl --version | grep 'v5'`;
my $file = __FILE__;
my $m = `cat $file | grep '^use'`;
my @modules = map { m/use (.+?);/; $1 } split("\n", $m);