#!/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 =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