• Use standard line-editing control keys, including filename tab-completion and a command history (curtesy of Term::Readline).

• End a line with a backslash character to continue it on another line.

• Enter "<<" followed by return, then several lines of text, followed by return and control-d.

EXAMPLES

Declaring a subroutine

In the below, I use the << notation to enter a multi-line block of Perl, terminated by a control-D.

You can then call any subroutines you've defined on the shell prompt line.

            

              
              
~> perl lib/Shell/Shell.pm
Term::ShellKit: Starting interactive shell
Term::ShellKit> <<
sub count {
  my $count = shift;
  join(', ', ( 0 .. $count ) )
}
^D
Term::ShellKit> count(3)
count(3): 0, 1, 2, 3
Term::ShellKit> count(5)
count(5): 0, 1, 2, 3, 4, 5
            
          

Declaring a shell command

To create a new shell command, define a function using the above << syntax.

You can then call those functions with space-separated arguments on the shell prompt line. These commands can use existing shell methods for further interaction with the user.

            

              
              
~> perl lib/Shell/Shell.pm
Term::ShellKit: Starting interactive shell
Term::ShellKit> <<
sub do_count {
  my $count = shift || $Term::ShellKitInput->( 'do_count to: ' );
  $shell->shell_out_lines( join(', ', ( 0 .. $count ) ) );
}
^D
Term::ShellKit> do_count 3
0, 1, 2, 3
Term::ShellKit> do_count  
do_count to: 3
0, 1, 2, 3