Import opf p5-IO-Stty-.02, a perl module for futzing w/ TTYs.

5 files changed, 59 insertions, 0 deletions

diff --git a/devel/p5-IO-Stty/Makefile b/devel/p5-IO-Stty/Makefile
new file mode 100644
index 00000000000..393653d8a44
--- /dev/null
+++ b/devel/p5-IO-Stty/Makefile
@@ -0,0 +1,15 @@
+# $NetBSD: Makefile,v 1.1.1.1 2000/07/16 00:39:58 thorpej Exp $
+
+DISTNAME=	IO-Stty-.02
+PKGNAME=	p5-${DISTNAME}
+CATEGORIES=	devel perl5
+MASTER_SITES=	${MASTER_SITE_PERL_CPAN:=IO/}
+
+MAINTAINER=	packages@netbsd.org
+
+USE_PERL5=	YES
+
+do-configure:
+	@cd ${WRKSRC}; ${SETENV} ${MAKE_ENV} ${PREFIX}/bin/perl Makefile.PL
+
+.include "../../mk/bsd.pkg.mk"
diff --git a/devel/p5-IO-Stty/files/md5 b/devel/p5-IO-Stty/files/md5
new file mode 100644
index 00000000000..ec1bc3297df
--- /dev/null
+++ b/devel/p5-IO-Stty/files/md5
@@ -0,0 +1,3 @@
+$NetBSD: md5,v 1.1.1.1 2000/07/16 00:39:58 thorpej Exp $
+
+MD5 (IO-Stty-.02.tar.gz) = db2919cf267fce93682f0f854359f04e
diff --git a/devel/p5-IO-Stty/pkg/COMMENT b/devel/p5-IO-Stty/pkg/COMMENT
new file mode 100644
index 00000000000..38b1870bb6f
--- /dev/null
+++ b/devel/p5-IO-Stty/pkg/COMMENT
@@ -0,0 +1 @@
+Perl class for I/O on tty devices.
diff --git a/devel/p5-IO-Stty/pkg/DESCR b/devel/p5-IO-Stty/pkg/DESCR
new file mode 100644
index 00000000000..30f9e3c1ec7
--- /dev/null
+++ b/devel/p5-IO-Stty/pkg/DESCR
@@ -0,0 +1,34 @@
+
+	The two perl items in this package are an stty shell script and a 
+module for setting terminal parameters. to use the Stty.pm module stuff it in
+your $PERL_LIB_DIR/site_perl/IO directory. In your scripts do:
+
+     use IO::Stty;
+     IO::Stty::stty(\*TTYHANDLE, @modes);
+
+     This has not been tailored to the IO::File stuff but will work with it as
+indicated. Before you go futzing with term parameters it's a good idea to grab
+the current settings and restore them when you finish.
+
+	Example:
+
+     use IO::Stty;
+     $old_mode=IO::Stty::stty(\*STDIN,'-g');
+     # Turn off echoing.
+     IO::Stty::stty(\*STDIN,'-echo');
+     # Do whatever.. grab input maybe?
+     $read_password = <>;
+     # Now restore the old mode.
+     IO::Stty::stty(\*STDIN,$old_mode);
+     # What settings do we have anyway?
+     print IO::Stty::stty(\*STDIN,'-a');
+
+
+     This is use at your own risk software. Do anything you want with it except
+blame me for it blowing up your machine because it's full of bugs.
+     The file stty.txt indicates what functions are supported. Standard POSIX
+stuff. If any of the settings are wrong and you actually know what some of
+these extremely arcane settings (like what 'sane' should be in POSIX land)
+really should be, let me know.
+
+11-08-97	Austin Schutz<tex@habit.com>
diff --git a/devel/p5-IO-Stty/pkg/PLIST b/devel/p5-IO-Stty/pkg/PLIST
new file mode 100644
index 00000000000..005151869d3
--- /dev/null
+++ b/devel/p5-IO-Stty/pkg/PLIST
@@ -0,0 +1,6 @@
+@comment $NetBSD: PLIST,v 1.1.1.1 2000/07/16 00:39:59 thorpej Exp $
+lib/perl5/site_perl/IO/stty.pl
+lib/perl5/site_perl/IO/Stty.pm
+lib/perl5/site_perl/${MACHINE_ARCH}-${LOWER_OPSYS}/auto/IO/Stty/.packlist
+@dirrm lib/perl5/site_perl/${MACHINE_ARCH}-${LOWER_OPSYS}/auto/IO/Stty
+@dirrm lib/perl5/site_perl/IO