Ivan Rocha irr

irr / gist:1958081

Created March 2, 2012 12:19 — forked from Ovid/gist:1957853

perlfind -- perldoc on steroids

	#!/usr/bin/env perl

	use strict;
	use warnings;
	use Carp qw(cluck);

	use autodie ':all';
	use Getopt::Long 2.33 qw(:config auto_help);
	use File::Find::Rule;
	use File::Basename 'basename';