On Feb 7, 2008, at 8:40 PM, Matisse Enzer wrote:

Here's the command line that seems to work for me:

 ack -h '^use\s+(\S+);' --output='$1' | sort -u


Yes, but that assumes that they'll be of the form

  use Foo::Bar;

but what if you have

  use Foo::Bar 'baz';

or

  use Foo::Bar qw( baz quux );

My regex will miss those latter two.  Mr. Armstrong's regex is safer.

xoxo,
Andy

--
Andy Lester => [EMAIL PROTECTED] => www.petdance.com => AIM:petdance




Reply via email to