NAME

App::scriptdist - create a distribution around a perl script

SYNOPSIS

use App::scriptdist qw(:all);

DESCRIPTION

This module provides the utility functions for the scriptdist program that builds a basic Perl CPAN distribution around a standalone script file that already exists.

I do not intend this for new development and don't want to create an authoring tool. You can do that with some other tool (or fork this one and build your own).

FUNCTIONS

prompt( QUERY )

Provide a prompt, get the response, chomp the neewline, and return the answer.

find_files( DIRECTORY )

Find all the files under a directory.

copy( INPUT_FILE, OUTPUT_FILE, CONFIG_HASH )

Copy the file from one place to another.

gitify()

Unless the environment variable SCRIPTDIST_SKIP_GIT is set, init a git repo, add all the files, and make the initial commit.

script_template( SCRIPT_NAME )

Return the script template.

content( CONFIG_HASH )

Return a hash reference of the contents of the files to add. The key is the filename and the value is its contents.

TO DO

  • Copy modules into lib directory (to create module dist)

  • Command line switches to turn things on and off

Maybe a good idea, maybe not

  • Add a cover.t and pod coverage test?

  • Interactive mode?

SOURCE AVAILABILITY

This source is part of a Github project.

https://github.com/briandfoy/scriptdist

CREDITS

Thanks to Soren Andersen for putting this script through its paces and suggesting many changes to actually make it work.

AUTHOR

brian d foy, <briandfoy@pobox.com>

COPYRIGHT

Copyright © 2004-2024, brian d foy <briandfoy@pobox.com>. All rights reserved.

This code is available under the Artistic License 2.0.