#!/usr/bin/env perl
use strict;
use warnings;
use App::FileSummoner;
App::FileSummoner::run(@ARGV);
__END__
=head1 NAME
summon-file - Create new file using best possible skeleton.
=head1 USAGE
summon-file <path/file.ext>
=head1 NOTES
=head2 .skeletons
Skeletons are located in F<.skeletons> directory.
=head2 .skeletons/rules.pl
This file defines mapping that will be used for decision which skeleton should
be used for a given file.
Example:
registerSkeleton([PathContains('/cgi-bin/'), HasExt('pl')], 'perl/cgi.pl');
registerSkeleton(HasExt('pl'), 'perl/script.pl');
=cut