Perl

how to flush a file
My process writes to the log file. I want to periodically flush it so that tail -f on the the log file shows the progress on a regular basis. This is what I do to write in the log file:- open(LOGFILE,"> file name") or die ... print LOGFILE "aaaaa\n" ; this print is done during the life of the process. What i... 30 Jan 2007 20:23

help with mime head
Hello I am trygint to get the header of a string. I dont thnk this can be done with the mime head module but may bet there is a work around. I am fetching a message to a variable called $message using LWP, i tried MIME::HEAD->read"$message" and - from_file("$message) but now luck. May be I need a funtion that ... 28 Jan 2007 20:09

Using perl modules
I am having difficulty using perl modules, I know once I start and figure this out, it would make my life simplier. My module is used for logging into a database. #!/usr/bin/perl use strict; use warnings; package login_acdb; my $file = "/etc/accesscare/$ENV{'ORACLE_SID'}/voice/ac.login"; open LOGINID, ... 25 Jan 2007 13:28

Statistics Extraction
Hi, I wanted to extract specific information of MAC and PHY statistics from the statistics log file. The Statistics file contains information other than MAC and PHY also. I am mainly concerned about "frames with invalid header" and "packets with invalid length" from the MAC Statistics and "transmit errors" from... 30 Jan 2007 14:37

Search pattern not terminated at (Spreadsheet::Read example)
Using ActiveState perl 5.8.8 on XP, I'm attempting to use an example from the Perl Hacks book by O'reilly. It uses Spreadsheet::Read and simply retrieves the row and cell data from a .xls file. However, it throws this error ... Search pattern not terminated at ... and then points to this line ... print... 21 Jan 2007 19:02

How to decode javascript encodeURI / encodeURIComponent ?
Simply: How ? I can't believe no-one's already done it, but I can't find any exact mention of it on the tinterweb. Closest I got was someone suggesting a custom javascript function to encode a URI in the style that Perl expects - no way José - what's the point in the W3C standardising this stuff for all our be... 24 Jan 2007 16:21

regex problem
Hey all, I'm trying to search and replace to the following string: 0|1061203|150200559802-12345|STUDIO 0006979867|STUDIO|0066678||STUDIO|150200559802-12345|STAFF|XX|STAFF|XX| What I want to do is replace whatever is in between | |. For example, I want to replace STAFF with PROSTAFF. my current regex loo... 19 Jan 2007 06:13

I/O open()
Hi I'm trying to understand the I/O open function better. I got the test script to work, but I not sure if the syntax is standard. Could someone explain the syntax option, or point to a link, for using open to run OS commands. use strict; my $line; open (NS_COMMAND, 'nslookup -type=soa wa.gov. ns1.si... 19 Jan 2007 17:53

parse body mime message
Hello I am downloading a mime from a web server using lwp my $fullpage = $ua->request($req)->as_string; then i was trying to extract the text body of the mesage using MIME tools but i cant seem get this to work when i do $parser->parse_data($fullpage) i get Can't use string ("MIME::Parser") as a HASH ref while "... 19 Jan 2007 00:03

convert Vbscript to Perl code
Hi All, please help me convert following VBscript code to Perl code ............................................................................................... strLDAP = "LDAP://CN=test,OU=users,DC=tech,DC=com" set usr = GetObject(strLDAP) Wscript.echo usr.TerminalServicesWorkDirectory Wscript.echo usr.Te... 19 Jan 2007 05:43