The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
 / 
Shell-Verbose-0.1
River stage zero No dependents
++
/ Shell::Verbose

NAME

Shell::Verbose - A verbose version of system()

SYNOPSIS

    use Shell::Verbose qw/verboseSystem vsys/;

    verboseSystem('echo "foo"');
    # echo "foo"
    # foo

    vsys('echo "foo"');
    # echo "foo"
    # foo

    Shell::Verbose->prefix('===> ');
    # ===> echo 'foo'
    # foo

    Shell::Verbose->before('Running the next line');
    # Running the next line
    # ===> echo 'foo'
    # foo

    Shell::Verbose->after('That was easy');
    # Running the next line
    # ===> echo 'foo'
    # foo
    # That was easy

DESCRIPTION

A simple wrapper for system() that prints the command

AUTHOR

Drew Stephens <drew@dinomit.net>