Re: Getting keyboard scancode, etc.

2003-03-23 Thread ktb
On Sun, Mar 23, 2003 at 05:43:38AM -1000, [EMAIL PROTECTED] wrote: > On 23 Mar 2003 at 9:32, ktb wrote: > > > On Sun, Mar 23, 2003 at 04:14:58AM -1000, [EMAIL PROTECTED] wrote: > > > Hi Everyone - > > > > > > I remember using the DOS keyboard software inter

Re: Getting keyboard scancode, etc.

2003-03-23 Thread ktb
On Sun, Mar 23, 2003 at 04:14:58AM -1000, [EMAIL PROTECTED] wrote: > Hi Everyone - > > I remember using the DOS keyboard software interrupt > in the old, old days to get the scancode, shift/alt/ > ctrl state, the ascii code, etc. from a keystroke. > I need this information for a cross-os applicat

delete paragraphs

2003-02-25 Thread ktb
I have a file "test2" with the format of: [Kent] Address:3473278 jones omaha, ne 65465 Phone: Home 8943, Work 83485, Cell 84853 Email: Home @j.cor, Work Birthdate: 88484 [Pat] Address:747474 street where, CA 848484 Phone: Home 555-, Work 33

Re: Adding '#' at the beginning of a file

2003-02-23 Thread ktb
On Sun, Feb 23, 2003 at 11:36:38PM +0800, Leaw, Chern Jian wrote: > Hi, > > I'm trying to add the symbol '#' in the /etc/services file for disabling the > following services: > ftp > chargen > daytime > > I've placed the name of the services i.e ftp, chargen, daytime into a text > file to be read

Re: help with (do $ENV{HOME})

2003-02-16 Thread ktb
On Sun, Feb 16, 2003 at 12:05:57PM -0500, Wiggins d'Anconia wrote: > > > ktb wrote: > >I've read the faq on "do" and looked around the web but can't discover > >what I'm doing wrong. > > > >I have a file named "text" with

help with (do $ENV{HOME})

2003-02-16 Thread ktb
I've read the faq on "do" and looked around the web but can't discover what I'm doing wrong. I have a file named "text" with the following line it it - $name = "kent"; My prog contains the following - #!/usr/bin/perl use diagnostics; use strict; use warnings; do "$ENV{HOME}/scratch/address_book/

Re: How to Konsole

2003-02-16 Thread ktb
On Sun, Feb 16, 2003 at 11:18:32AM +, Benjamin Jeeves wrote: > > Hi > > How would I go about display a message say like "hello and welcome" in a > konsole from a perl scripts if some thing meets a pattern that my perl srcipt > is look for. OK I'm going to post the following in hopes that

Re: How to Konsole

2003-02-16 Thread ktb
On Sun, Feb 16, 2003 at 12:42:29PM +, Benjamin Jeeves wrote: > On Sunday 16 Feb 2003 11:43 am, Beau E. Cox wrote: > > Hi > > > > > -Original Message- > > > From: Benjamin Jeeves [mailto:[EMAIL PROTECTED]] > > > Sent: Sunday, February 16, 2003 1:19 AM > > > To: [EMAIL PROTECTED] > > > Su

Re: recursive edit tweaks

2003-02-15 Thread ktb
On Sat, Feb 15, 2003 at 12:33:15PM -0800, John W. Krahn wrote: > Ktb wrote: > > > > The program below works as intended. It recursively searches > > directories and changes any instances of "spike.domain" to > > "spike.lib.domain" without making

Re: writing a script

2003-02-15 Thread ktb
On Sat, Feb 15, 2003 at 01:03:50PM -0800, brady jacksan wrote: > Hi > > I am writing a script that reads file from command line and places > each line from the files into an array, and prints out the total lines > read and then > each line read. > > while (defined ($files = <>)) { > ch

recursive edit tweaks

2003-02-15 Thread ktb
The program below works as intended. It recursively searches directories and changes any instances of "spike.domain" to "spike.lib.domain" without making a backup (I will already have the directory backed up). There are two things I would like to have the program do that I'm having trouble with.

Re: pattern match problem

2003-02-13 Thread ktb
On Thu, Feb 13, 2003 at 04:39:17PM -0800, tao wang wrote: > hi, > > I'm trying to write a script to match a pattern like > this: 1.10 > > I wrote [\d.]+, but this also match with pattern ... > , which has no number in it. Could somebody help me > with it? I'm new to perl and scripts. thank

creating a shell

2003-02-12 Thread ktb
I was wondering if anyone knows any recourses on how to write a unix/linux shell in perl? I found the site for psh but I'm not advanced enough to understand the code. What I'm looking for is a real basic tutorial or doc of some kind that explains how to write a simple shell. I know this is an

ssh manager help

2003-02-12 Thread ktb
I'm trying to write a perl wrapper to manage all my ssh sessions. My idea is to put the following code into a while loop. The problem I'm having is I would like to be able to log into a remote server and then hit, say ^sn which would suspend the current ssh session and activate the wrapper. You

slurp in file

2003-02-09 Thread ktb
Is there any function that places perl code from a file into a program as if it was just part of the program file itself? Something like: file ** Hello World. ** program $file = slurp('file'); print "$file\n": I'm creating an address book as described on page 237 of "Beg

Re: calling sub

2003-02-09 Thread ktb
On Sun, Feb 09, 2003 at 04:39:00PM +, Benjamin Jeeves wrote: > > Can someone tell me why my call to build_db() works but when I call alert() it > will not work as it calls alert but will not enter the while loop I my > opening the file with > > #!/usr/bin/perl > > $filein = $ARGV[0]; > ope

Re: unloading zip files with perl install script

2003-02-08 Thread ktb
On Sat, Feb 08, 2003 at 09:37:40PM -0800, Patricia Hinman wrote: > Does anyone know how to use a zip utility in an > installation script. I would like to create an > installation script for a program I've written. My > only hurdle is learning how to unpack the zip file. > I've heard of gunzip,

Re: unloading zip files with perl install script

2003-02-08 Thread ktb
On Sat, Feb 08, 2003 at 09:37:40PM -0800, Patricia Hinman wrote: > Does anyone know how to use a zip utility in an > installation script. I would like to create an > installation script for a program I've written. My > only hurdle is learning how to unpack the zip file. > I've heard of gunzip,