| Fry-Shell documentation | Contained in the Fry-Shell distribution. |
Fry::ReadLine::Default - Default ReadLine plugin for Fry::Shell.
Me. Gabriel that is. I welcome feedback and bug reports to cldwalker AT chwhat DOT com . If you like using perl,linux,vim and databases to make your life easier (not lazier ;) check out my website at www.chwhat.com.
Copyright (c) 2004, Gabriel Horner. All rights reserved.
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
| Fry-Shell documentation | Contained in the Fry-Shell distribution. |
package Fry::ReadLine::Default; use base 'Fry::Base'; sub setup {} sub stdin {} sub prompt { my ($cls,$prompt) = @_; $cls->view("\n".$prompt); chomp(my $entry = <STDIN>); #$cls->addhistory($entry); return $entry; } 1; __END__