trouble connecting to Oracle

hi all, i tried to send this to perl-DBI but it did not get through, nevertheless, maybe someone has any ideea, please. I am executing the following code: use CGI; use DBI; use strict; my $query = new CGI; print $query->header; print $query->start_html("My Page"); print "\n"; print "\n"; prin

perl 5.8.6 811 and oracle 10g installing 5.8.3

hi all, i have had Perl 5.8.6.811 running for quite some time on my machine. Everything was fine until I had to install Oracle 10g. Now, whenever I try to execute one of my old perl scripts I get the following error: Perl lib version (v5.8.3) doesn't match executable version (v5.8.6) at C:\oracle\p

download window instead of executing

hi all, just a quick questions: why do I get a download window when I'm trying to execute a .pl file in the browser? It's something very simple but I forgot how one fixes this. I'll get back with details if necessary, kowalsky __

lazy, lazy, lazy

Hi all, I have a few admin chores I hate and I'm done with a couple of them in that I found a way to automate everything from one end to the other using the WWW::Mechanize module since the data sources have web interfaces. Now I'm left with a few maneuvers that use a client-server app, it is possib

trouble with insert in MS SQL

hi all, haven't worked with this for a while - still, don't remember getting this error message ever ... The code I'm running is below: use Win32::OLE; use Win32::OLE::Const; $db = "db1"; $srv = "mySrv"; $uid = "usr1"; $pwd = "usr1pwd"; #this is an OLEDB connection to a MS-SQL Database $connSt

readdir problem

Hi all, I am trying to read only files in a directory; I need to jump over the dot files and any subdirectories. Seems like a simple thing, however with opendir(DIR, $dir) || die "can't opendir $dir: $!"; foreach my $file (readdir DIR) { next if (/^\./); # skip over dot files print "file

problem with tar.gz read

Hi everybody, I guess I still have a problem with my reading of tar.gz files. Everything work jst great with the code below until I happened to hit a corrupted file and I can't see a way to jump over it. My point is that in a list with hundreds of tar.gz files all of them are valid, less one (o

extract members from tar.gz files in Windows

Hi all, new problem encountered - I am trying to write a short script that will search a pattern in file names that are either within a directory or inside a zip archive in some directory. I managed to get the results I needed while the files were within zip archives (or unarchived) however now I s

extract memeber of zip archive to directory

Hi all, would anybody tell me how to extract a zip archive member to a certain directory? I used the code below; however I can't extract the member in other place than the present working directory (namely, I am checking if the member has a certain name and if true I extract it - this always happe

stop a Windows application from within a Perl script

Hi all, I have a very simple script that pings the outside world and reboots a router when it gets no answer to the ping anymore; on top of that I need to stop and start again a windows application. I know how to start the app and I know how to stop it if it were unix -> to stop the app, just kill

parsing event logs in win2000

hi all, i need to parse system event logs for win2000 Professional and i can see what i'm looking for when i use the viewer; i can also save the log in text format from the viewer. Is there any way i could programmatically get an *.evt file in a given path AND SAVE IT IN TEXT FORMAT, and then open

auditing shutdowns for win2000

hi all, i'm trying to write the simplest program to log win2000 activity - first step is distinguish between graceful vs. non graceful shutdowns. is there a way to write something in a file during the event of a shutdown? Or rather can i write something in a file that is guaranteed to be there as l

perl executed out of c#

Hi all, i have the following code in a c# application: public void execscript() { Process myprocess = new Process(); try { string perl_script = "err0.pl"; myprocess.StartInfo.FileName "c:\\perl_dev\\" + perl_script; myprocess.StartInfo.CreateNoWindow = false;

perl, c# and errors

Hi all, I am running a perl script from within a c# application. I use a System.Diagnostics.Process object that takes care of that. My question is: if I need to trap a perl error (supposedly using a Win32Exception object) is there a special way to raise that error in the perl script? And if so, how

trying to understand how regex works

Hi all, I guess it must be a simple problem, but it's a mystery to me. I got 30 "fields" all separated by pipes in some files with many many lines. Some of the fields need to be changed, but mostly I have to drop any line that has certain values in certain fields. So I start by skipping any field

computations with backreferences

Hi all, I have a regex, it's isolating some numbers in each line of a text file and I want to add some computation with those numbers on the same line. I know you can basically stick any function in a regex but I don't know how. Hence, the code below won't work: $_=~s/^[A-Z]\t(\d{1,2})\t.*\t(\d{2

pkzip in win and unzip in lin

Hi all, I got into some trouble trying to unzip using the unzip command in Linux (RH 6.2) a number of files that were zipped in Windows uzing pKzip. What happens is that I always get an error message saying my path isn't recognized (probably because all slashes are backslashes instead of forward).

remove duplicate lines

Hi all, I need to remove duplicate lines from a whole bunch of files, I already have a script that does this but it's brute force (compare first line with the others one by one; if no match write it to another file), hence very inefficient. Somehow I believe there must be a nicer approach. Does an

shutdown Apache

Hi all, I recently installed Oracle 8i (8.1.7) on Win2000 and it always starts Apache as a default web server. I need to run IIS, however it won't start because Apache is already there, I tried stopping everything that has anything to do with Oracle, however, Apache is still running. Does anybody

re-launch a perl script

Hi all, I'm looking for a way to check if some perl script is running or not. If the script is not running I should immediately start it and do just the same at subsequent periodic checks if the script is down again. What would be the best solution? I was thinking of a perl script #2 that verifie

perl running slow

Hi everybody, I'm running a perl programm that looks for some data in a database and then it parses a large number of logfiles in order to get counts for some specific items found in those logs. All in all the flow should be like this: open a database grab some fields, concatenate them create abou

symbolic link question

Hi everybody, I was offered an elegant solution to manipulate files in a directory: open(OUT,">>output_file") || die; foreach $file (<*daily*>) { #match files with 'daily' open(FILE,$file) || die; while() { #do something to that file; print OUT; } close FILE; } close

a tough question on algorithms

Hi all, I'm trying to implement an algorithm that finds the shortest path between two points of a graph. It seems that the whole theory behind this is pretty complicated, however I found an algorithm (Dijkstra) that is reasonably easy to understand, however I'm not clear on how easy is to implemen

very simple question on URL

Hi all, a very simple program to capture the source of a web page would be: use LWP::Simple; $url="http://www.somepage.com"; $content = get($url); open (FILE, >c:/some/path/srcfile.txt) || die($!); print FILE $content; close (FILE); What if I only want to point to an url, namely I want my perl s