summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorjluehrs2 <jluehrs2@uiuc.edu>2007-08-16 21:32:31 -0500
committerjluehrs2 <jluehrs2@uiuc.edu>2007-08-16 21:32:31 -0500
commitfe665b323186414e66de9b7107fe2533aa630795 (patch)
tree4ab3a14f6996418086f13ce9a95b80f7319c8b11
parent9864508d5692d6f4c5e1d358281eb4842c23f77b (diff)
downloadio-pty-easy-fe665b323186414e66de9b7107fe2533aa630795.tar.gz
io-pty-easy-fe665b323186414e66de9b7107fe2533aa630795.zip
add some more to the synopsis
-rw-r--r--lib/IO/Pty/Easy.pm1
1 files changed, 1 insertions, 0 deletions
diff --git a/lib/IO/Pty/Easy.pm b/lib/IO/Pty/Easy.pm
index f6049c2..b2fae90 100644
--- a/lib/IO/Pty/Easy.pm
+++ b/lib/IO/Pty/Easy.pm
@@ -26,6 +26,7 @@ our $VERSION = '0.01';
while (1) {
my $input = # read a key here...
+ my $input = 'Elbereth' if $input eq "\ce";
my $chars = $pty->write($input, 0);
last if defined($chars) && $chars == 0;
my $output = $pty->read(0);