Skip to content

Instantly share code, notes, and snippets.

@mix3
Created March 21, 2011 13:03
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save mix3/879419 to your computer and use it in GitHub Desktop.
Save mix3/879419 to your computer and use it in GitHub Desktop.
useしてるものを取り出してみる
grep use lib/ -h -r | perl -e '%hash; while(<>){if(/use (\w+(::)?)+/){if($& =~ /use (.+)/){$hash{$1}++}}}; foreach(keys %hash){print $_."\n"}' | egrep -v 'strict|warnings|base' | xargs
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment