in reply to ScanDeps usage
#!/usr/bin/perl -l use strict; use autodie; use warnings; use Module::ScanDeps; use Data::Dumper::Concise; my $hash_ref = scan_deps( files => [ '/root/Desktop/lib-authtest' ], recurse => 1, ); print "Now starting: \n"; while (my ($key, $value) = each(%{$hash_ref})) { print $key, Dumper($value); }
|
|---|