Perl Forum

How can I get character by character input without the user pressing the enter key after each single character entry?

Hi, I'm using ActivePerl on Win98 and this is starting to annoy me. Why isn't \n accepted as a carriage return when I'm using sockets? If I run the following program, I get no response other than the SMTP info header. Using a proxy to investigate, I found that what is getting sent to the server is only an 0a character not an 0d0a sequence, any...

Hi all, Below is my script that will be used to connect to a remote host and change my password automatically: =========================================== #!/usr/bin/perl use strict();

Hello, Any assistance would be appreciated: As the subject suggests I am trying to gunzip files using the Compress::Zlib module. The following is basically the code that I am working with: ------------------------------------------------ ------------------------------------------------

Hi I am researching a new commercial project, and would like to incorporate scripting, I use perl a lot and it is my language of choice for a script (see next post) BUT I seem to be having trouble getting a clear idea on licencing issues I dont want to learn how to embed perl and discover that I need to provide the entire perl library...

Hi all, I am new to Tk, so please bear with me. I need someone better at math than me to help me figure this out. I am drawing multiple arcs on the same circle. All arcs start at 90 and have varying negative extents (different colors, goes all the way around. Represents a microbial genome). So now that my arcs are drawn, I would would...

Hi all, Below is my script that will be used to connect to a remote host and change my password automatically: =========================================== #!/usr/bin/perl use strict();

Hi, I need to write a script which reads some data and reports the findings. Just to give you an idea the structure is similar to the following. Data input example: HEADING 1 ********** ColumnA ColumnB ColumnC ColumnD ColumnE

I first came across rebol a while ago; it seemed interesting but then i was put off by its proprietary nature, although the core of the language is a free download. Recently however, i can't help but say i was totally impressed. I needed an open source wikiblog/wikilog, whatever you wanna call it, basically a hybrid of a blog and a wiki. I...

Good day all! I'm looking to write a prog that sits in between a telnet client and server. In other words, the telnet client of the user's choice would connect to my prog which would, in turn, connect to the telnet server. My prog would move data back and forth between the client and the server without manipulating it. I've started playing...

Hi, $ netstat -a | netstats.pl The above works on my Linux box. But if I try to run this on my Win2000 Pro then this statement fails: while (<STDIN>) { print "Inside the loop..."; }

I'm trying to learn how to use the opendir() function with perl, and each time I try to run my perl script I keep getting "Permission denied". Here is the script: open (DIR, "c:\\Temp\\Directory1") or die "Can't open the directory. $! \n"; while (defined ($filename = readdir(DIR)) ) { open (INPUT, "<c:\\Temp\\directory1\\".$filename)...

Hi, I'm looking for a solution to capture the data on a web page with 2 buttons, send & receive threads of this URL http://atlantis.b-rail.be:8880/atlantis/SilverStream/Pages/PM_GalileoLog.html. It would be nice to gather both pages and dump them into a MySql database. Do you think Perl would be suitable for this and what's the direction I...

Hello, I want a good book that help me do a perl program that is used as interpreter for a small, BASIC-like language. I need a good book that help me doing this please if there is a good website that deal with making inerpreter please give me the link

want mor phase, want control more phase in the WAVE 1) fear, rage - PAY never in God book pay in arrogance book, you reach, or man you meet, in sit of weak man law as mor is manifest, less agony for the feared and enraged because they are known as socio-economic problems, and the whip cannot land on the fall out and dead horse,

attempt to invoke directory as script: c:/foxserv/www/cgi-bin This is standing in error.log Apache. Das steht in error.log Apache. And I get: Und ich bekomme: Forbidden.

Hello, Aspect oriented Software development seems to be expanding in the popular vision of developers, with more and more IDE 'add-ons' and even more specialized tools,Jboss etc. I've seen more and more languages integrate AOP,AspectJ (Java), AspectR(Ruby)etc.Aspect oriented does seem to be the place to go from a developer standpoint.What...

I'm working on a Perl script that reads a text file. The file could have multiple new lines together, could have lots of spaces between words, tabs, and so on. Bottome line, I want to end up with the text from the file all in a single line, with nothing but single spaces between words. So my Perl script reads the file into an array and puts...

I want to start a perl pgm in the background on my hosts web server as a stand-alone process. I only have ftp access. What I've done, so far, is: 1) created the actual background perl script, named fetchmyweather.pl. This script retrieves a string from an noaa weather station and inserts it into a mysql db, then sleeps for an hour, and...

I just compiled (but did not install) perl 5.8.0 on an SGI Origin 300 server (IP35) running IRIX 6.5.20m. Make test reported one test error, which I narrowed down to .../lib/ExUtils/t/Constant.t using harness. I ran the test separately, and got the following detailed error report: .../lib/ExtUtils/t/Constant....ok 6/51Confused test...

I pulled this script out of a larger one to test, and I can't figure it out. If I keep this script in the same directory as the files I want to read, it works fine, but if I move the script out of it, no dice. Am I missing something? Thanks Being script: #!/usr/bin/perl

If I attempt to crop a string using regular expressions and the () operator for grouping, Perl always seems to return the last match. For instance, if I have the following: my $test = "a0\nb0\nc0\na1\nb1\nc1\n"; $test =~ s/.*(\w\d\n).*/$1/s; print "$test"; The output would be:

I need to change the IP address of about 200 DNS records (zone files) and also increase the serial number by one for each. Is there a script out there to do this? I'm not a pro at perl scripting and my ISP has forced this on me and so I'm under pressure to get this done asap. Basically I need it done like this: 1) Look through all zone...

Is there a way to edit the background color of a text box? I've tried setting the background color when using the ->insert tag, but that only sets the background right behind the text and I want the whole text box to be that color. Also, is there a place I can find all the tags associated with the different widgets? Thanks!

Here goes: I looked all over the place, and I think I'm still too far down on the "steep part of the learning curve" to figure this out. When writing perl scripts, I touch the filename and then chmod a+x it so that it is executable with './'. Then I edit the new file. What I normally do is something like this: touch file.pl; chmod a+x...