bin/perlrequires

   1 #! /usr/bin/perl
   2 use strict;
   3 use warnings;
   4
   5 my %use;
   6 while (<>) {
   7         /^\s*(?:use|require)\s+([\w:.]+)\b/ or next;
   8         $use{$1}=1;
   9         }
  10 print "perl -MCPAN -e 'install qw()'\n";
  11 print "$_\n" for sort keys(%use);