maintainer=mailto:wjm@metronet.com Text= ###################################################################### EndText= Name=CBREAK mode in MS-DOS ==== SAMPLE CODE ==== Path=0/perlinfo/scripts/assorted/dos.getkey.better Type=0 Text=
# File Name: dos.getkey.better # File Size in BYTES: 12833 # Sender/Author/Poster: jbormel@athena.mit.edu (Joe Bormel) # Subject: CBREAK mode in MS-DOS ==== SAMPLE CODE ==== # Archived: Apr 29 02:16 1994 # # Thanks to everyone who responded to my plea for help to get CBREAK # functionality in PERL for MS-DOS. I've packaged up the results into # an executable DOS batch file to serve as sample code for others. #EndText= Text= ###################################################################### EndText= Name=my first perl hack Path=0/perlinfo/scripts/assorted/firsthack Type=0 Text=
# File Name: firsthack # File Size in BYTES: 1179 # Sender/Author/Poster: galt%asylum.cs.utah.edu@cs.utah.edu (Greg Alt) # Subject: my first perl hack # Archived: Apr 29 02:16 1994 # # I kept hearing about perl, and it sounded interesting, so I finally got # around to trying it out. Here's my first perl program: #EndText= Text= ###################################################################### EndText= Name=Re: Self-modifying code? Path=0/perlinfo/scripts/assorted/self-reproducing-code.example Type=0 Text=
# File Name: self-reproducing-code.example # File Size in BYTES: 1313 # Sender/Author/Poster: boyd@cs.buffalo.edu (Daniel F Boyd) # Subject: Re: Self-modifying code? # Archived: Apr 29 02:16 1994 # # Here is my self-reproducing Perl script. Bonus: Since we're both at # Buffalo the pathname is correct for our machines (and probably nowhere # else). #EndText= Text= ###################################################################### EndText= Name=uutraf.pl Path=0/perlinfo/scripts/assorted/uutraf.pl Type=0 Text=
# File Name: uutraf.pl # File Size in BYTES: 5679 # Subject: How much uucp traffic? # Archived: Apr 29 02:16 1994 # # Calculate the amount of uucp traffic on a site #EndText= Text= ###################################################################### EndText= Name=Re: Global behavior of @_ (??) Path=0/perlinfo/scripts/assorted/ATUS Type=0 Text=
# File Name: ATUS # File Size in BYTES: 3521 # Sender/Author/Poster: bob@max.cpd.tandem.com (Bob Mackay) # Subject: Re: Global behavior of @_ (??) # Archived: Aug 19 1993 # # ATUS - AT UnderScore checker - Bob Mackay - MACKAY_BOB@TANDEM.COM # This program finds parameterless calls to subroutines that are expecting # arguments. Such calls are equivalent to calling the subroutine as # &proc_name (@_); which is not generally what is intended. #EndText= Text= ###################################################################### EndText= Name=Electronic Balloting Path=0/perlinfo/scripts/assorted/Electronic.ballot.shar Type=0 Text=
# File Name: Electronic.ballot.shar # File Size in BYTES: 20590 # Sender/Author/Poster: jsh@teal.csn.org (Jeffrey Haemer) # Subject: Electronic Balloting # Archived: Jun 11 1993 # # $Id: ballot,v 3.0 1993/06/04 19:53:34 ballot Exp ballot $ # A few weeks back, we posted a note asking for your advice and aid # in prototyping software for electronic standards balloting. We # got it. Thanks. Now we want some more. #EndText= Text= ###################################################################### EndText= Name=LCG Random number generator for Perl Path=0/perlinfo/scripts/assorted/LCG.random.generator Type=0 Text=
# File Name: LCG.random.generator # File Size in BYTES: 19888 # Sender/Author/Poster: wengland@stephsf.com (Bill England) # Subject: LCG Random number generator for Perl # Archived: Aug 8 1993 # # $Id: lotto6,v 1.3 1991/12/09 22:36:48 wengland Exp $ # This LCG method has the advantage that it can provide 32 bit numbers # on 16 bit machines (I've had to hack in in assembler on some systems #EndText= Text= ###################################################################### EndText= Name=Perl Script for Generating Text Stereograms (was Re: Text SIRDS) Path=0/perlinfo/scripts/assorted/SIRDS.text.pl Type=0 Text=
# File Name: SIRDS.text.pl # File Size in BYTES: 9348 # Sender/Author/Poster: flan@vader.wustl.edu (Ian Flanigan) # Subject: Perl Script for Generating Text Stereograms (was Re: Text SIRDS) # Archived: Aug 2 1993 # # Text Random Letter Stereogram Generator # As promised, here is the perl script that makes Random Letter # Stereograms. #EndText= Text= ###################################################################### EndText= Name=Re: Name completion question Path=0/perlinfo/scripts/assorted/alias.cd.pl Type=0 Text=
# File Name: alias.cd.pl # File Size in BYTES: 3078 # Sender/Author/Poster: exukenc@exu.ericsson.se (Ken Corey,T/TF,75841) # Subject: Re: Name completion question # Archived: Aug 24 1993 # # by Ken Corey, kenc@sol.acs.unt.edu @1992, you may give but not sell. # provides name completion in a cd command. #EndText= Text= ###################################################################### EndText= Name=Baseball Division Picker Program Path=0/perlinfo/scripts/assorted/baseball.pl Type=0 Text=
# File Name: baseball.pl # File Size in BYTES: 4043 # Sender/Author/Poster: stergios@leland.Stanford.EDU (Stergios) # Subject: Baseball Division Picker Program # Archived: Apr 25 1993 # # Here's a perl program to pick the division standings for Major League # Baseball. #EndText= Text= ###################################################################### EndText= Name=ckbal - check balanced tokens in C source (perl script) Path=0/perlinfo/scripts/assorted/ckbal Type=0 Text=
# File Name: ckbal # File Size in BYTES: 10139 # Sender/Author/Poster: arielf@mirage.nsc.com (Ariel Faigon) # Subject: ckbal - check balanced tokens in C source (perl script) # Archived: Jul 15 1993 # # I wrote this about a year ago in an evening of such frustration, and just thought # it might be a good idea to post this for the benefit of all. #EndText= Text= ###################################################################### EndText= Name=cleave: break files into arbitrary sized chunks Path=0/perlinfo/scripts/assorted/cleave.pl Type=0 Text=
# File Name: cleave.pl # File Size in BYTES: 3585 # Sender/Author/Poster: tamills@ingr.com # Subject: MSDOS Perl - Why does read() only give back 51 bytes? # Archived: Apr 27 1993 # # Cleave I wrote this script for breaking up files into arbitrary sized chunks. The # primary use for me would be transporting large files on floppies. #EndText= Text= ###################################################################### EndText= Name=conserve Path=0/perlinfo/scripts/assorted/conserve Type=0 Text=
# File Name: conserve # File Size in BYTES: 1075 # Sender/Author/Poster: dhesi@rahul.net (Rahul Dhesi) # Subject: perl script that calculates conservation hint # Archived: Oct 5 1993 # # Rahul DhesiEndText= Text= ###################################################################### EndText= Name=Re: determining available disk space Path=0/perlinfo/scripts/assorted/dfscan Type=0 Text=# This program prints a resource conservation hint based on # arithmetic conversions. It should be named 'conserve'. #
# File Name: dfscan # File Size in BYTES: 3876 # Sender/Author/Poster: asherman@fmrco.com (Aaron Sherman) # Subject: Re: determining available disk space # Archived: Aug 26 1993 # # Scan output of df and provide it via command-line options # By Aaron Sherman (I-Kinetics, Inc.), 1993 #EndText= Text= ###################################################################### EndText= Name=Re: A 6809 disassembler Path=0/perlinfo/scripts/assorted/disassemble.6809.pl Type=0 Text=
# File Name: disassemble.6809.pl # File Size in BYTES: 6300 # Sender/Author/Poster: charste@summit (Charles Stevens) # Subject: Re: A 6809 disassembler # Archived: Jul 27 1993 # # How about half a disassembler written in Perl?? (Only about 2 hours work -- # mostly typing in the instruction set. #EndText= Text= ###################################################################### EndText= Name=Re: Setting DOS variables. HELP! Path=0/perlinfo/scripts/assorted/dos.env.set Type=0 Text=
# File Name: dos.env.set # File Size in BYTES: 2432 # Sender/Author/Poster: dbc@tc.fluke.COM (Dan Carson) # Subject: Re: Setting DOS variables. HELP! # Archived: Jul 9 1993 # # >: I am able to read DOS environment variables, but I am having trouble # >: setting the variables to new values. #EndText= Text= ###################################################################### EndText= Name=Get a key in DOS (how-to) Path=0/perlinfo/scripts/assorted/dos.getkey Type=0 Text=
# File Name: dos.getkey # File Size in BYTES: 3504 # Sender/Author/Poster: dbc@tc.fluke.COM (Dan Carson) # Subject: Re: Testing input character if arrow or function key etc (DOS). # Archived: Apr 6 1993 # # In article <1493@alsys1.aecom.yu.edu> manaster@yu1.yu.edu (Chaim Manaster) writes: # >The question is in two parts: # >1) How do you get a single character returned from the keyboard # >without requiring a carriage return after the keypress? #EndText= Text= ###################################################################### EndText= Name=Re: Questions about using Perl on DOS Path=0/perlinfo/scripts/assorted/dos.invocation.and.INC Type=0 Text=
# File Name: dos.invocation.and.INC # File Size in BYTES: 1338 # Sender/Author/Poster: buboo@alf.uib.no (Ove Ruben R Olsen) # Subject: Re: Questions about using Perl on DOS # Archived: Aug 14 1993 # #EndText= Text= ###################################################################### EndText= Name=Replacement for DSKLAYT2 avail Path=0/perlinfo/scripts/assorted/dsklay2.info Type=0 Text=
# File Name: dsklay2.info # File Size in BYTES: 2032 # Sender/Author/Poster: longe@statsci.com (Michael Longe') # Subject: Replacement for DSKLAYT2 avail # Archived: Jun 8 1993 # # Fed up with the bugs in Microsoft's Setup utilities, I wrote a replacement # for DSKLAYT2.EXE in Perl. (The DOS version of the Perl interpreter is # available from various sites.) #EndText= Text= ###################################################################### EndText= Name=hm fAl & hm tmAshA!!! Path=9/perlinfo/scripts/assorted/fAl.pl.Z Type=9 Text=
# File Name: fAl.pl.Z - compressed binary file # File Size in BYTES: 20417 # Sender/Author/Poster: cheragh@alborz.mti.sgi.com (Mash Cheragh-Ali) # Subject: hm fAl & hm tmAshA!!! # Archived: Jun 8 1993 # # # I've been gathering all the Persian sayings that have come to my mind, or # I have seen here and there. Following is what I have so far. EndText= Text= ###################################################################### EndText= Name=Query the geographic server Path=0/perlinfo/scripts/assorted/geographic.pl Type=0 Text=# File Name: geographic.pl # File Size in BYTES: 2277 # print("\tgeo place name\n"); # print("Geographic NameServer Query: \"$request\"\n"); #EndText= Text= ###################################################################### EndText= Name=getargs.pl (for use and comment) Path=0/perlinfo/scripts/assorted/getargs Type=0 Text=# File Name: getargs # File Size in BYTES: 8155 # Sender/Author/Poster: lawrence@epps.kodak.com (Scott Lawrence) # Subject: getargs.pl (for use and comment) # Archived: Apr 6 1993 # # Provides the routine getargs # which takes a picture of the expected arguments of the form: #EndText= Text= ###################################################################### EndText= Name=Implement a Hebrew Calendar Path=0/perlinfo/scripts/assorted/hebrew.calendar.pl Type=0 Text=# File Name: hebrew.calendar.pl # File Size in BYTES: 3412 # Sender/Author/Poster: faigin@aero.org (Daniel P. Faigin) # Subject: Re: Chron & Shabbat (was: FAQ) # Archived: May 8 1993 # The script below uses the hebcal and rise programs available from nysernet. # sub checkday { #EndText= Text= ###################################################################### EndText= Name=here: broadcast to folks Path=0/perlinfo/scripts/assorted/here.pl Type=0 Text=# File Name: here.pl - broadcast to online users # File Size in BYTES: 5392 # Archived: Apr 6 1993 # #EndText= Text= ###################################################################### EndText= Name=Re: Statistic routines ? (Histogram-generator) Path=0/perlinfo/scripts/assorted/histogram.pl Type=0 Text=# File Name: histogram.pl # File Size in BYTES: 7096 # Sender/Author/Poster: Dov GrobgeldEndText= Text= ###################################################################### EndText= Name=Re: Statistic routines ? (Another Histogram generator) Path=0/perlinfo/scripts/assorted/histogram.tchrist.pl Type=0 Text=# Subject: Re: Statistic routines ? # Archived: Apr 6 1993 # # histbin # version 0.1 # Bin data for a histogram. # # File Name: histogram.tchrist.pl # File Size in BYTES: 2464 # Sender/Author/Poster: Tom ChristiansenEndText= Text= ###################################################################### EndText= Name=id - replacement id(1) Path=0/perlinfo/scripts/assorted/id2 Type=0 Text=# Subject: Re: Statistic routines ? # Archived: Apr 6 1993 # Here's something I hacked out yesterday. The format is # title a b c d e # where the letters are the number of scores of value 1..5; # # File Name: id2 # File Size in BYTES: 2454 # Sender/Author/Poster: chetal@pyrps5.pyramid.com (Pradeep Chetal) # Subject: Re: I get "Insecure PATH" when I run commands from emacs... # Archived: Apr 6 1993 # #EndText= Text= ###################################################################### EndText= Name=Dbot2 - an irc 'bot' Path=0/perlinfo/scripts/assorted/irc.bot.pl Type=0 Text=# File Name: irc.bot.pl # File Size in BYTES: 5162 # Sender/Author/Poster: noord@ucs.orst.edu (its MR. DAVO to you...) # Subject: Re: A C bot. # Archived: Jun 21 1993 # # Okeydokey, here it is. Any questions, just ask :) #EndText= Text= ###################################################################### EndText= Name=v37i068: ixobeeper - Talk to alpha-numeric pager from Unix, Part01/02 Path=9/perlinfo/scripts/assorted/ixobeeper.Z Type=9 Text=# File Name: ixobeeper # File Size in BYTES: 37873 # Sender/Author/Poster: tal@Warren.MENTORG.COM (Tom Limoncelli) # Subject: v37i068: ixobeeper - Talk to alpha-numeric pager from Unix, Part01/02 # Archived: May 23 1993 # # tpage.pl -- front-end to tpage system. # by Tom Limoncelli, tal@warren.mentorg.com #EndText= Text= ###################################################################### EndText= Name=magic - an implementation of file(1) Path=0/perlinfo/scripts/assorted/magic.pl.info Type=0 Text=# File Name: magic.pl.info # File Size in BYTES: 1458 # Sender/Author/Poster: dws@ssec.wisc.edu (DaviD W. Sanderson) # Subject: Re: Is file(1) available in perl? # Archived: Sep 3 1993 # # would you please tell me where I can find a copy? #EndText= Text= ###################################################################### EndText= Name=mg - fancy grep for perl Path=0/perlinfo/scripts/assorted/mg.pl Type=0 Text=# File Name: mg.pl # File Size in BYTES: 2920 # Sender/Author/Poster: utashiro@sran230.sra.co.jp (Kazumasa Utashiro) # Subject: Re: Directory Grep?? # Archived: Jun 11 1993 # # In article <1993Jun10.143017.25932@rtsg.mot.com> # ellis@rtsg.mot.com (John T Ellis) writes: # >> Has anyone implemented a directory grep in perl? My ideal # >> view of the tool includes - #EndText= Text= ###################################################################### EndText= Name=Morse Code practice program Path=0/perlinfo/scripts/assorted/morse.pl Type=0 Text=# File Name: morse.pl # File Size in BYTES: 7615 # Sender/Author/Poster: jsc@monolith.mit.edu (Jin S Choi) # Subject: Morse Code practice program # Archived: Aug 15 1993 # # morse code practice program # I wrote this a while ago to practice for a ham license (which I haven't # gotten yet), and thought it might be of interest to someone out #EndText= Text= ###################################################################### EndText= Name=myquota: change user quotas (HP syscall) Path=0/perlinfo/scripts/assorted/myquota.HP.pl Type=0 Text=# File Name: myquota.HP.pl # File Size in BYTES: 1974 # Sender/Author/Poster: # Subject: # Archived: Jun 13 1993 # #EndText= Text= ###################################################################### EndText= Name=Eight Queens Solutions Path=0/perlinfo/scripts/assorted/n-queens.pl Type=0 Text=# File Name: n-queens.pl # File Size in BYTES: 3512 # Sender/Author/Poster: levan@ms.uky.edu (Jerry LeVan) # Subject: Eight Queens Solutions # Archived: Jun 10 1993 # # A Perl script to solve the n-queens problem. #EndText= Text= ###################################################################### EndText= Name=Re: tail -f clone in perl? Path=0/perlinfo/scripts/assorted/newtail.pl Type=0 Text=# File Name: newtail.pl # File Size in BYTES: 1784 # Sender/Author/Poster: ian@unipalm.co.uk (Ian Phillipps) # Subject: Re: tail -f clone in perl? # Archived: Jun 23 1993 # # cc_paul@rcvie.co.at (Wolf Paul) writes: # >I need to write a script which monitors several files and # >collects lines added to these files into a single output # >stream... #EndText= Text= ###################################################################### EndText= Name=Re: operl - an experimental object-oriented package for perl Path=0/perlinfo/scripts/assorted/objperl.shar Type=0 Text=# File Name: objperl.shar # File Size in BYTES: 12337 # Sender/Author/Poster: sakoh@sraco2.us.sra.co.jp (Hiroshi &) # Subject: Re: operl - an experimental object-oriented package for perl # Archived: Apr 6 1993 # #EndText= Text= ###################################################################### EndText= Name=Perl-Pay v1.1 - payroll implementation (compressed) Path=9/perlinfo/scripts/assorted/payroll.Z Type=9 Text=# File Name: payroll # File Size in BYTES: 27742 # Sender/Author/Poster: wengland@stephsf.com (Bill England) # Subject: Perl - Payroll (Part 1 of 2) # Archived: May 23 1993 # # $Id: payroll_calc.pl,v 1.3 1993/01/14 20:42:30 wengland Exp wengland $ # Perl -- Payroll # Ok. This may not be as polished as I would like but here is # the perl-payroll as it now stands ... #EndText= Text= ###################################################################### EndText= Name=perload - builds up autoloaded and dataloaded perl scripts (Part01/01) Path=9/perlinfo/scripts/assorted/perload.Z Type=9 Text=# File Name: perload # File Size in BYTES: 12664 # Sender/Author/Poster: ram@acri.acri.fr (Raphael Manfredi) # Subject: perload - builds up autoloaded and dataloaded perl scripts (Part01/01) # Archived: Jun 25 1993 # # Archive-Name: perload.Z - compressed binary # The following script will convert any existing perl script into a dataloaded # or autoloaded version, which is a big win on startup time and memory usage # for large scripts, at a small performance cost. #EndText= Text= ###################################################################### EndText= Name=multiple host command launcher (gsh) in Perl Path=0/perlinfo/scripts/assorted/pgsh Type=0 Text=# File Name: pgsh # File Size in BYTES: 6138 # Sender/Author/Poster: merlyn@iwarp.intel.com (Randal Schwartz) # Subject: multiple host command launcher (gsh) in Perl # Archived: Apr 6 1993 #EndText= Text= ###################################################################### EndText= Name=mkpprof - profiles a perl script Path=9/perlinfo/scripts/assorted/pprof.pl.Z Type=9 Text=# File Name: pprof.pl.Z # File Size in BYTES: 15k # Sender/Author/Poster: arf@maths.nott.ac.uk (Anthony Iano-Fletcher) # Subject: Re: looking for perl profiler # Archived: Jun 18 1993 # # DESCRIPTION # mkpprof calculates the profiling of the specified script and # places the output into a file in the current directory. # This data file can be collated by pprof (1). # This uses a ammended form of Kresten Krab Thorup's profiling # perldb.pl. #EndText= Text= ###################################################################### EndText= Name=About-Quran.grd Path=0/perlinfo/scripts/assorted/quran.server Type=0 Text=# File Name: quran.server # File Size in BYTES: 3789 # Sender/Author/Poster: an32925@anon.penet.fi (ali) # Subject: About-Quran.grd # Archived: Sep 2 1993 # # Here is README file for QURAN-SERVER. I will try to put it in tehran, # but I am not sure if they accept this! In the case they do not put # this in tehran.stanford.edu, I'll send it part by part to SCI. I hope # this be useful and you get no problem in using it! #EndText= Text= ###################################################################### EndText= Name=perl script to unpack ftpmail (and other) binaries Path=0/perlinfo/scripts/assorted/randalls.uu.pl Type=0 Text=# File Name: randalls.uu.pl # File Size in BYTES: 2644 # Sender/Author/Poster: merlyn@ora.com (Randal L. Schwartz) # Subject: Re: perl script to unpack ftpmail (and other) binaries # Archived: Jun 24 1993 # ## Version 1.09 on 92/02/25 ## Written by Randal L. Schwartz, Stonehenge Consulting Services, Portland, OR ## uudecodes the arguments (or stdin), ignoring non-uuencoded lines #EndText= Text= ###################################################################### EndText= Text= ###################################################################### EndText= Name=Re: slip script (long) & question Path=0/perlinfo/scripts/assorted/slipup.lwall Type=0 Text=# File Name: slipup.lwall # File Size in BYTES: 10711 # Sender/Author/Poster: lwall@netlabs.com (Larry Wall) # Subject: Re: slip script (long) & question # Archived: Aug 30 1993 # # Can't say offhand, but here's my original slipup for comparison purposes. # It seems to me that the BSD folks had to modify it somehow, but I don't # recall how. #EndText= Text= ###################################################################### EndText= Name=Another stat program (perl script) Path=0/perlinfo/scripts/assorted/stat.pl Type=0 Text=# File Name: stat.pl # File Size in BYTES: 9433 # Sender/Author/Poster: tdw@uk.ac.cam.cl (Tim Wilson) # Subject: Another stat program (perl script) # Archived: Apr 6 1993 # # $Id: stat,v 1.1 1992/10/05 10:53:13 tdw Exp $ # Stat(2) files and print results. #EndText= Text= ###################################################################### EndText= Name=symlink.pl Path=0/perlinfo/scripts/assorted/symlink.pl Type=0 Text=# File Name: symlink.pl # File Size in BYTES: 3423 # Archived: Apr 6 1993 # # As merlyn@romulus.reed.edu (Randal L. Schwartz) pointed out, I can't # do this properly without looking at the symbolic links. So here is my # second attempt, dealing with symlinks. #EndText= Text= ###################################################################### EndText= Name=Re: Perl and MODEMS Path=0/perlinfo/scripts/assorted/talk-to-modem.pl Type=0 Text=# File Name: talk-to-modem.pl # File Size in BYTES: 2522 # Sender/Author/Poster: eric.arnold@sun.com # Subject: Re: Perl and MODEMS # Archived: Apr 6 1993 # # This worked for me on a Sun(4.1.2) with a Hayes compatible USRobotics modem: # open(MODEM, "+>/dev/cua0") || die "Can't open /dev/ttyb\n"; # system("stty -echo raw >/dev/cua0"); #EndText= Text= ###################################################################### EndText= Name=HP-style calculator in perl Path=0/perlinfo/scripts/assorted/tcalc.pl Type=0 Text=# File Name: tcalc.pl # File Size in BYTES: 4501 # Sender/Author/Poster: bet@sbi.com (Bennett Todd @ Salomon Brothers Inc., NY ) # Subject: HP-style calculator in perl # Archived: Apr 6 1993 # # I finally got tired of not having an HP-style termcap-based calculator # around, so I wrote one in Perl. #EndText= Text= ###################################################################### EndText= Name=Re: tee like program to pipe to another program? Path=0/perlinfo/scripts/assorted/tee2 Type=0 Text=# File Name: tee2 # File Size in BYTES: 3291 # Sender/Author/Poster: tchrist@convex.COM (Tom Christiansen) # Subject: Re: tee like program to pipe to another program? # Archived: Apr 6 1993 # # Tom ChristiansenEndText= Text= ###################################################################### EndText= Name=Re: How much "free memory" is too little? Path=0/perlinfo/scripts/assorted/top.total.pl Type=0 Text=# # File Name: top.total.pl # File Size in BYTES: 3067 # Sender/Author/Poster: lott@bogner.informatik.uni-kl.de (Christopher Lott) # Subject: Re: How much "free memory" is too little? # Archived: Jun 3 1993 # # a script to total the SIZE fields from top #EndText= Text= ###################################################################### EndText= Name=ttyreset.pl Path=0/perlinfo/scripts/assorted/ttyreset.pl Type=0 Text=# File Name: ttyreset.pl # File Size in BYTES: 583 # Sender/Author/Poster: # Subject: # Archived: Apr 6 1993 # #EndText= Text= ###################################################################### EndText= Name=How to pack/unpack bits? Path=0/perlinfo/scripts/assorted/unpack.bitfields.pl Type=0 Text=# File Name: unpack.bitfields.pl # File Size in BYTES: 7430 # Sender/Author/Poster: dnoble@devvax.jpl.nasa.gov (David Noble) # Subject: Re: How to pack/unpack bits? # Archived: Jun 19 1993 # # The following routines will give you the pack/unpack behavior you want, # as long as each collection of bitfields fits evenly into an 8, 16, or # 32-bit block. I've never really had any use for templates using 'b' #EndText= Text= ###################################################################### EndText= Name=watch - track changes in things (files, etc) Path=0/perlinfo/scripts/assorted/watch.curseperl Type=0 Text=# File Name: watch.curseperl # File Size in BYTES: 3759 # Sender/Author/Poster: ggr@nareen.acci.COM.AU (Greg Rose) # Subject: Re: Screen 'stuff'... # Archived: Jun 10 1993 # # Watch the world go by #EndText= Text= ###################################################################### EndText= Name=Re: DOS: Script to edit WIN.INI? Path=0/perlinfo/scripts/assorted/win.ini.edit.pl Type=0 Text=# File Name: win.ini.edit.pl # File Size in BYTES: 5646 # Sender/Author/Poster: evas@cs.few.eur.nl (Eelco van Asperen) # Subject: Re: DOS: Script to edit WIN.INI? # Archived: May 24 1993 # # >I manage a large lab of PC computers, and occasionally need to make global # >changes in their local configuration files. The best way for me to do this # >automatically is through a master centralized script. #EndText= Text= ###################################################################### EndText= Name=wtmp.trim.pl Path=0/perlinfo/scripts/assorted/wtmp.trim.pl Type=0 Text=# File Name: wtmp.trim.pl # File Size in BYTES: 3148 # Sender/Author/Poster: # Subject: # Archived: Apr 8 1993 # # $Header: /local/undoc/RCS/wtrim,v 1.12 1993/04/08 17:35:55 dhesi Exp $ # Trim the wtmp file to hold a specified number of records. ##EndText= Text=Comments, suggestions, or criticisms on this archive to <wjm@metronet.com> #EndText=