/[Term-Shelly]/trunk/examples/demo.pl
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /trunk/examples/demo.pl

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 13 by dpavlin, Mon Jun 25 10:03:45 2007 UTC revision 14 by dpavlin, Mon Jun 25 14:42:34 2007 UTC
# Line 8  my @WORDS = qw(hello how are you today f Line 8  my @WORDS = qw(hello how are you today f
8    
9  my $sh = Term::Shelly->new();  my $sh = Term::Shelly->new();
10    
11    my $debug = shift @ARGV;
12    
13  if (0) {  if (0) {
14  $sh->out(  $sh->out(
15  "This is a demo of Term::Shelly. It is designed to show you some of the  "This is a demo of Term::Shelly. It is designed to show you some of the
# Line 25  the line."); Line 27  the line.");
27    
28  $sh->{"completion_function"} = \&completer;  $sh->{"completion_function"} = \&completer;
29  $sh->prompt("Foo> ");  $sh->prompt("Foo> ");
30    $sh->{debug} = $debug;
31    
32  $sh->out("Welcome!");  $sh->out("Welcome!");
33    
Legend:
Removed from v.13  
changed lines
  Added in v.14
  ViewVC Help
Powered by ViewVC 1.1.26