#!/usr/bin/env perl use strict; use warnings; use Config::General; if (! $ARGV[0]) { print "Just a simple wrapper over module-starter\n"; print "USAGE: prj-create-module-perl.pl [Module::Name]'\n"; print " Creates perl module in curent working directory.\n"; exit; } my $conf = new Config::General("config"); my %config = $conf->getall; `module-starter --module="$ARGV[0]" --author="$config{author}" --email="$config{email}"`;