Perl DBI for Sybase

Hello all: I am pretty new in this matter. My code looks like this: $sth2=$dbh->prepare("Select job.joid, job_name,command,owner,machine,std_out_file,std_err_file,box_joid,timezone from job, job2 where job.joid = job2.joid"); $sth2->execute; while (my $info = $sth2->fetchrow_hasref) { calls a d

RE: Finding IP Addy, subnet, gateway, and DNS info.

There are a bunch of useful scripts at http://www.roth.net/perl/scripts. There should be one there called TCP-IP-Info.pl(I might have the name wrong) that does what you need. It looks a little cryptic at first, but if you dissect it a little you can find what you need. If you're not already su

Finding IP Addy, subnet, gateway, and DNS info.

I have seen something around online through these post about trying to find that information. This will be for a Windows 9X/2k/Xp and so on. Can someone point me to the right module that will help me find this stuff? Thank you, Joseph Bajin Associate Systems Administrator.

Re: DBI-> connect load datafile ?

On Tuesday 05 March 2002 21:46, Brian Volk wrote: > Hi All, > > I'm having trouble loading a datafile into MySQL database via perl. I > have a couple of scripts working but I get stuck when I try to load a > file Here is what I have so far... How far off am I?? :-) > > $dbh->do("load data

need help with line substitution

Hi everyone. Im new to perl and this is my first prac programso please excuse me if its seems a little basic :) Anyway heres the problem... My program writes to a file form the command line using the command 'new'. for instance : input: new a 1 writes a:1:0 to file input: new b

Re: substitution of values

On Wed, Mar 06, 2002 at 10:50:34AM -0800, Pradeep Sethi wrote: > > Hi All, > > I have a string > > $str="first value %s and second is %s, substitute them"; > > and an array @vars=('I', 'II'); > > i want to substitute the array with the respective values > > any regular expression or join etc

Re: problems installing nmake

From: "PJ" <[EMAIL PROTECTED]> > I'm half way through my 3rd week with Perl, I'm having a great time > with it, and I'm blown away by what I've learned so far. :-) > I'm trying to install "nmake" so that I can get at modules that aren't > available through PPM and I'm running i

problems installing nmake

Hello everyone, I'm half way through my 3rd week with Perl, I'm having a great time with it, and I'm blown away by what I've learned so far. I'm trying to install "nmake" so that I can get at modules that aren't available through PPM and I'm running in to problems. I've looked at various tuto

substitution of values

Hi All, I have a string $str="first value %s and second is %s, substitute them"; and an array @vars=('I', 'II'); i want to substitute the array with the respective values any regular expression or join etc ? Thanks in advance Pradeep Pradeep Seth

Re: Can I do better than these configs

Thanks a lot Joseph, and thanks to everyone who took time to respond to my mail. __ William Ampeh (x3939) Federal Reserve Board -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Re: Can I do better than these configs

Hi, I like the Second one a lot better. I am a huge fan of ASUS products. You might want to check with www.pricewatch.com. You might find some better prices. Good choice though!!! Joseph Bajin Associate Systems Administrator

RE: Invoke MS EXCELL From Perl

You might want to check out the docs on Win32::OLE. -Original Message- From: Hewlett Pickens [mailto:[EMAIL PROTECTED]] Sent: Wednesday, March 06, 2002 2:54 PM To: zPerl Beginners Subject: Invoke MS EXCELL From Perl Is there a way to invoke Microsoft EXCELL from Perl? Environment:

Invoke MS EXCELL From Perl

Is there a way to invoke Microsoft EXCELL from Perl? Environment: Using IE on Windows 98, have invoked a CGI script on Linux/390 which sends a comma separated variable (CSV) file back to IE, and the Perl script there files it on the PC's hard drive. Want to do some line/bar/pie graphics on

Re: command line arguments

From: Nikola Janceski <[EMAIL PROTECTED]> > Is there a way to get the command line arguments before they are > expanded by the shell? > > script.pl file* names* > > I want to get the file* and not the expanded list of file1 file2 file3 > file4 etc. > > I know I can put it in quotes but is ther

RE: command line arguments

Take a look at your shell manpage. I just took a quick look at the bash manpage, and it allows you to turn off pathname expansion with a -f switch. So this worked for me: $ bash -f $ script.pl file* names* $ exit Or as a one liner... $ bash -fc 'script.pl file* names*' Rob -Original Me

RE: Hacking perldoc

yeah... it's called www.perldoc.com -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]] Sent: Wednesday, March 06, 2002 7:09 PM To: [EMAIL PROTECTED] Subject: Hacking perldoc Greetings; Has anyone ever considered hacking perldoc so it can work like man -k ? I looked

Re: command line arguments

> "Nikola" == Nikola Janceski <[EMAIL PROTECTED]> writes: Nikola> Is there a way to get the command line arguments before they Nikola> are expanded by the shell? Nope. Perl simply doesn't get to see them. It's part of your interaction with the shell. Nikola> I know I can put i

Hacking perldoc

Greetings; Has anyone ever considered hacking perldoc so it can work like man -k ? I looked at it a little but it is still beyond my capabilities "a bit". This would be a big help to us Perl beginners. Every time I try to use it I get a response like No documentation found for "remaind

RE: command line arguments

I was hoping for some way to capture it in perl instead with out having to change the command line arguments. -Original Message- From: Hanson, Robert [mailto:[EMAIL PROTECTED]] Sent: Wednesday, March 06, 2002 5:05 PM To: 'Nikola Janceski'; Beginners (E-mail) Subject: RE: command line argu

RIPPING out info

greetings if data on a website is not embedded in html tags, and it usually isn't (especially if what is being retrieved is an asp), does anyone know a simple way to hack the information out anyway? potentially a script that will extract info from the database whose info is being displayed on

RE: command line arguments

You should be able to just escape the *. Single quoting them should also work. script.pl file\* names\* script.pl 'file*' 'names*' Rob -Original Message- From: Nikola Janceski [mailto:[EMAIL PROTECTED]] Sent: Wednesday, March 06, 2002 5:03 PM To: Beginners (E-mail) Subject: command lin

command line arguments

Is there a way to get the command line arguments before they are expanded by the shell? script.pl file* names* I want to get the file* and not the expanded list of file1 file2 file3 file4 etc. I know I can put it in quotes but is there any other way around it? Delivery Queue

Re: Email Attachments

From: [EMAIL PROTECTED] > Within my perl script running on AIX I am using qx to > run mpack to attach text files to an out going mail > message. This works fine, however it is limited. I > want to be able to add body to the message explaining > the text file attachment. Are there any modul

Fliptop's guestbook

Dear Fliptop: What is the url to your guestbook lessons? Some one on the cgi list would like to have some programming projects to try out. And I would like to do your guestbook lesson too. -- --- - Teresa Raymond - - Mariposa Net - - ht

Email Attachments

Within my perl script running on AIX I am using qx to run mpack to attach text files to an out going mail message. This works fine, however it is limited. I want to be able to add body to the message explaining the text file attachment. Are there any modules within perl or other freeware u

RE: Good God. I'm going to pull my hair out.

Good article, luckily I try to avoid too many references just for that reason, but then my programs sometimes get bigger when run. Sanity for memory... sometimes you don't have a choice and need to keep an eye on things. -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]

RE: Can I do better than these configs

use www.pricewatch.com to find best prices, and what does this have to do with the topic of this mailing list? -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]] Sent: Wednesday, March 06, 2002 12:40 PM To: [EMAIL PROTECTED] Subject: Can I do better than these configs

Can I do better than these configs

Hello, Putting on hold my current projects, I am thinking about building (upgrading) a PC for home use, so far this is the best configuration I have come up with. I can get a better deal anywhere? Here are my configurations and prices. I am gearing towards Option 2. OPTON 1 Motherboard:

Re: Good God. I'm going to pull my hair out.

> "Derrick" == Derrick Wippler <[EMAIL PROTECTED]> writes: Derrick> Can anyone tell me why " print $rec->[4] " prints Derrick> but print "$recs[0]->[4] does not print a thing ? Ah yes, another candidate to read my "deep copy" article...

Re: help me with a better backstepper?

On Mar 6, M z said: >I've written a little program to analyze lines that >are longer than 70 characters, and if so, break at >position 70 (if it is whitespace), if not whitespace >(i.e. is in the middle of a word) it steps back to the >first whitespace and breaks there. s/(.{1,70})\s/$1\n/g;

Re: help me with a better backstepper?

M Z wrote: > > Hi Hello, > I've written a little program to analyze lines that > are longer than 70 characters, and if so, break at > position 70 (if it is whitespace), if not whitespace > (i.e. is in the middle of a word) it steps back to the > first whitespace and breaks there. > > However,

Re: How to zero fill a variable?

Tim Davis wrote: > > my $month = length((localtime)[4] + 1) == 1 ? '0' . ((localtime)[4] + 1) : >(localtime)[4] + 1; > my $day = length((localtime)[3]) != 1 ? (localtime)[3] : '0' . (localtime)[3]; > my $monthday = $month . $day; > my $output_file = join ('_', 'resend' , $monthday , "$key"); > .

RE: help me with a better backstepper?

DISCLAIMER: This is UNTESTED ... It's just something to try... $OrgLine = "adshe ms0e sad qweoic,m qwod x0 vndu qiudb siu "; While length of $OrgLine > 70 { Match on =~ /(.{0,70})\s/ Print $1 Remove $1 from $OrgLine ; } Print remainder of $OrgLine; So, the regex wou

keeping \n in an array when being passed through form

[repost with better subject and code put directly into the message] Ok, I'm getting closer thanks to the help of all the experts out here!! I'm totally thankful for all of your help. At http://staff.washington.edu/guru/cards2.cgi when you hit "End Phase" it passes, as a hidden form field, the

RE: delta time/date

Depends on the overhead you want. You can use timelocal and a simple calculation verses the overhead of the other routines to get a delta. Wags ;) -Original Message- From: Dittrich G. Michael [mailto:[EMAIL PROTECTED]] Sent: Wednesday, March 06, 2002 09:13 To: [EMAIL PROTECTED]

Re: delta time/date

You might want to try out the Date::Manip package. It has a function &Date_Cmp which compares any two dates. You first read the date through the function &ParseDate in the module, and then compare the dates through &Date_Cmp. HTH, -tir -- Tirthankar, IGIDR. +91-22-8400919 x275 (r), x593(

RE: delta time/date

Yeah, use the Date::Calc module or maybe Date::Manip. John -Original Message- From: Dittrich G. Michael [mailto:[EMAIL PROTECTED]] Sent: 06 March 2002 17:13 To: [EMAIL PROTECTED] Subject: delta time/date I try to find a quick and uncomplicated way to calculate the difference between on

Re: Weird characters between words in a database key

From: "Jay M" <[EMAIL PROTECTED]> > I am attempting to modify a large existing set of scripts. All of > these scripts use dbmopen/close to create databases. > > when a database record is created and the key contains multiple > words/variablels i.e. $DATABASE{"How" , "Are", $Yo

RE: unusual character splitting

"perldoc perllocale" has a lot of info and explains everything. It depends on a lot of things including your OS, and how it is setup. (at least that is what it says, I don't know enough about it to refute it) Rob -Original Message- From: Chris Ball [mailto:[EMAIL PROTECTED]] Sent: Wedne

delta time/date

I try to find a quick and uncomplicated way to calculate the difference between one and another date/time: @date1 = ($year1, $month1, $day1, $hour1, $minute1); @date2 = ($year2, $month2, $day2, $hour2, $minute2); @deltaDateTime = "difference"(@date1, @date2); print "@deltaDateTime\n"; 0 0 0 12

Re: unusual character splitting

> "alex" == alex vandenabeele writes: alex> thus is my question: which regex do i have to use so i'll get alex> the words with diaeresis also in @words? Hi, Alex. Try turning on Perl's locale support to help with this - add the line 'use locale;' to the top of your script. It depe

Weird characters between words in a database key

I am attempting to modify a large existing set of scripts. All of these scripts use dbmopen/close to create databases. when a database record is created and the key contains multiple words/variablels i.e. $DATABASE{"How" , "Are", $You} = $value whenever I output the key to html it prints the

Re: unusual character splitting

Hi Alex && List ! > i want to split a line like: > $line = 'hello, this is a test line, but what with the letter ä or ë?'; > but i won't get "ë" or "ä", > thus is my question: which regex do i have to use so i'll get the words > with diaeresis also in @words? @words = split(/[\W,.]/, $lijn); Un

Fwd: Re: Good God. I'm going to pull my hair out.

>ok. I'm sorry. I posted my code incorrectly. I'm using $rec[0]->[4] to try and access the data. ( I was just trying anything to get it to do something, and I didn't change my code back before I posted ) It's a standard multidimensional array. ( yes ? ) I've written many before. I have an exac

help me with a better backstepper?

Hi I've written a little program to analyze lines that are longer than 70 characters, and if so, break at position 70 (if it is whitespace), if not whitespace (i.e. is in the middle of a word) it steps back to the first whitespace and breaks there. However, I think there is probably a better way

Re: Problems with regex only matching first match on a line.

s/$pattern/$replace/g On Tue, 5 Mar 2002, Tor Hildrum wrote: > #!/usr/bin/perl -w > use strict; > use warnings; > > print "What file do you want to open?\n"; > chomp(my $openfile = ); > print "What file do you want to write to?\n"; > chomp(my $outfile = ); > print "What do you want to replace i

Re: how can i change this

Hi, again ! Forgot to clean up the code ... > open (MAIL, "| $mail $recipient") || &abort ("Can't open $mail: $!\n"); should read open (MAIL, "| $mail $recipient") || die ("Can't open $mail: $!\n"); Cheers, Jan -- cat /dev/world | perl -e "while (<>) {(/(^.*? \?) 42 \!/) && (print $1)}" err

RE: simple file reading question

> -Original Message- > From: siren jones [mailto:[EMAIL PROTECTED]] > Subject: simple file reading question > > I have a file containing a list of names, for example: > > S2000123456.met > S2000123457.ozone > S2000123458.hdr > S2000234569.met >. >. etc. > > I'm looking for a sho

Re: how can i change this

Hi Debbie && List ! At the moment the From: is automatically set by 'mail'. It assumes, that the uid, which owns the webserver process (nobody), is the sender of that mail. Here's another way to do it: my $mail = '/usr/sbin/sendmail'; my $recipient = 'somebody\@somewhere.on.the.net'; open

unusual character splitting

Hello I'm a student from belgium (Leuven) and i have to write a program in perl; and i have folowing problem: i want to split a line like: $line = 'hello, this is a test line, but what with the letter ä or ë?'; en when i split like this: @words = split(/[^\w]+/, $lijn); I'll get "hello", "

how can i change this

I have successfully modified an existing script that does the following: 1. uploads a file 2. takes the contents of a form and emails whoever, together with a link to the file (file exists on our web server). My problem is this. Everytime the email is delivered (linux red-hat 7.1), the sender i

Re: Good God. I'm going to pull my hair out.

Derrick Wippler wrote: > > Can anyone tell me why " print $rec->[4] " prints > but print "$recs[0]->[4] does not print a thing ? > > I've confimed the data, the first row in the fourth column is an "F" > $rec->[4] prints it, but $recs[0]->[4] does not !!! ARG @#@!#!!!@@!!@!! > PS: I'm us

Re: Good God. I'm going to pull my hair out.

On Mar 6, Derrick Wippler said: >Can anyone tell me why " print $rec->[4] " prints >but print "$recs[0]->[4] does not print a thing ? This is a scoping issue. > my @recs; > my $sql = shift; > my $st = $db->prepare($sql); > my $rc = $st->execute(@_); > my $rec; > > while ($rec = $st->fetch

Re: Good God. I'm going to pull my hair out.

Your code is printing $recs->[0][4] NOT $recs[0]->4 There is a big difference between the two (mainly the former is an arrayref whereas the latter is an array). Change your code to the latter and it should work. - Original Message - From: "Derrick Wippler" <[EMAIL PROTECTED]> To: <[EMAIL

RE: Good God. I'm going to pull my hair out.

uh... don't you mean? print $rec->[0 .. 4]; # element 0 through 4 or print $rec->[0,4]; ## elements 0 and 4 -Original Message- From: Derrick Wippler [mailto:[EMAIL PROTECTED]] Sent: Wednesday, March 06, 2002 2:08 PM To: [EMAIL PROTECTED] Subject: Good God. I'm going to pull my hair out.

Good God. I'm going to pull my hair out.

Can anyone tell me why " print $rec->[4] " prints but print "$recs[0]->[4] does not print a thing ? I've confimed the data, the first row in the fourth column is an "F" $rec->[4] prints it, but $recs[0]->[4] does not !!! ARG @#@!#!!!@@!!@!! PS: I'm using DBI, my DBI object is $db my

Re: simple file reading question

On Mar 6, siren jones said: >I have a file containing a list of names, for example: > >S2000123456.met >S2000123457.ozone >S2000123458.hdr >S2000234569.met > >I'm looking for a short way to read these filenames onto an array. Open the file, read the text to an array, close the file. How much sh

RE: simple file reading question

I mean my @files = glob("$indir/S*"); ## you can use wildcards -Original Message- From: Nikola Janceski [mailto:[EMAIL PROTECTED]] Sent: Wednesday, March 06, 2002 10:20 AM To: 'siren jones'; [EMAIL PROTECTED] Subject: RE: simple file reading question use the glob() function my @file

RE: simple file reading question

use the glob() function my @files = glob("$indir/filename"); -Original Message- From: siren jones [mailto:[EMAIL PROTECTED]] Sent: Wednesday, March 06, 2002 10:14 AM To: [EMAIL PROTECTED] Subject: simple file reading question I have a file containing a list of names, for example: S2

simple file reading question

I have a file containing a list of names, for example: S2000123456.met S2000123457.ozone S2000123458.hdr S2000234569.met . . etc. I'm looking for a short way to read these filenames onto an array. I tried: my @fils = <$indir/filename>; . but this just gives me the name of my input

Re: How to zero fill a variable?

> Fellow Perl lovers, > > I'm trying to zero fill a numeric variable (which > in this case happens to be the current month and > day). Does this sound familiar or what? > The sprintf (%02d) function would seem a likely > candidate for this, but I don't actually want to > print the value. It's b

How to zero fill a variable?

Fellow Perl lovers, I'm trying to zero fill a numeric variable (which in this case happens to be the current month and day). The sprintf (%02d) function would seem a likely candidate for this, but I don't actually want to print the value. It's being used as part of a filename. I've looked at

Re: Stumped on Date capture

Patrick Kenneally wrote: > > Being very dense about this but I cant capture the Date output to a scalar - > the output is: 20 days ago, it was 020214 > > I want the 020214 in a variable. perldoc -f sprintf > #!c:/perl/perl.exe > > use Strict; > use Date::Calc qw( Add_Delta_Days Today ); > >

Re: moving data from text file to db

On Wednesday 06 March 2002 00:34, Jon Molin wrote: - - - snip - - - > something like this maybe: > > open (DATAFILE, 'somefile'); > while () > { >my @values = split /: /, $_; >my $sql = "insert into $values[0] ... >$dbh->do ($sql); > } > > > /Jon - - - snip - - - Hi, Jon: Thanks. Th

Re: reseting a while loop that uses each?

On Wed, Mar 06, 2002 at 09:02:55AM -0500, Nikola Janceski wrote: > foreach my $file (keys %NEW){ > $rev = (keys %{$NEW{$file}})[0]; > while (my ($cfile, $ids) = each %COOR){ > if( grep $NEW{$file}{$rev}[2] == $_, @{ $ids } ){ > $RELATION{$file} = $R

reseting a while loop that uses each?

foreach my $file (keys %NEW){ $rev = (keys %{$NEW{$file}})[0]; while (my ($cfile, $ids) = each %COOR){ if( grep $NEW{$file}{$rev}[2] == $_, @{ $ids } ){ $RELATION{$file} = $RELATION{$cfile}; last;

Regular expression is sometimes found, at other times not. Why?

Hello, I am struggling with a regular expression. I am using the regex- program given in Learning Perl, 3rd expression, but the results are strange. I want to match the word "Stand" in the following line: http://www.erlangerliste.uni- erlangen.de" target="view_window">Erlanger Liste(Linksammlu

Stumped on Date capture

Being very dense about this but I cant capture the Date output to a scalar - the output is: 20 days ago, it was 020214 I want the 020214 in a variable. Thanks, PK #!c:/perl/perl.exe use Strict; use Date::Calc qw( Add_Delta_

Re: How I can execute Javascript into Perl?

From: "Luis Guillot" <[EMAIL PROTECTED]> > Where can I learn HEREDOC syntax? Do you Know any URL? Execute perldoc perldata and search for << Jenda === [EMAIL PROTECTED] == http://Jenda.Krynicky.cz == There is a reason for living. There must be. I've se

Re: sending keystrokes to the console

From: [EMAIL PROTECTED] > The problem is, once the program is called it requires further > keystrokes - RETURN to start the recording, and ESC to stop the > recording. I can set a default time for the recording process to run, > thereby circumventing the required keystrokes, but

Re: STDOUT

walter valenti wrote: > > Hi, > > i've got a binary executable file, that give a result on STDOUT (shell). > I'm reditected STDOUT on a file as: > > use Getopt::Long; > open(STDOUT,">/usr/local/netsaint/var/tmp") || die"$!\n"; > &GetOptions("p=i" => \$port); > $|=1; > system("/usr/local/netsain

Re: HTTPS --> HTTP::Request

On Wed, Mar 06, 2002 at 01:54:11PM +1030, Daniel Falkenberg wrote: > Just wondering what would be my best way of 'getting' HTML code with > Perl from a HTTPS URL. Is there a CPAN module out there that will > download a HTTPS site and extract all the HTML from it? Not sure what you need to extrac

Re: A question about strings and hexadecimal numbers of special characters

Hi O && List ! On Wednesday 06 March 2002 11:41 am, you wrote: > I'm very new to Perl and have a basic question. How can I convert special > characters contained in a string to hexadesimal numbers. sub HTMLify { my $what = shift; $what =~ s/(\W)/sprintf("%%%x", ord($1))/eg; return $w

Re: autorun

Hi ! On Wednesday 06 March 2002 09:21 am, you wrote: > How can I scheduler a cgi script? Depends on the platform you are working on. Window$ has its TaskPlaner, *nix has a cron daemon (man cron) Another way: let the script sleep while you dont need it. sleep (86400) sleeps for one da

sending keystrokes to the console

Hi, I am creating a perl/tk script to carry out speech recordings and to display a series of prompts & I want to run an external DOS program (for recording the speech) from my perl script. The problem is, once the program is called it requires further keystrokes - RETURN to start the recordin

Re: How I can execute Javascript into Perl?

Where can I learn HEREDOC syntax? Do you Know any URL? Thank you. - Original Message - From: "Jenda Krynicky" <[EMAIL PROTECTED]> To: <[EMAIL PROTECTED]> Sent: Wednesday, March 06, 2002 11:40 AM Subject: Re: How I can execute Javascript into Perl? > From: "Luis Guillot" <[EMAIL PROTEC

STDOUT

Hi, i've got a binary executable file, that give a result on STDOUT (shell). I'm reditected STDOUT on a file as: use Getopt::Long; open(STDOUT,">/usr/local/netsaint/var/tmp") || die"$!\n"; &GetOptions("p=i" => \$port); $|=1; system("/usr/local/netsaint/libexec/check_http 127.0.0.1 -p $port"); c

A question about strings and hexadecimal numbers of special characters

Hi. I'm very new to Perl and have a basic question. How can I convert special characters contained in a string to hexadesimal numbers. I'm trying to access a cgi program but the string I use with the post method contains quote marks, question marks, etc. and the program crashes. I have: $st

Re: How I can execute Javascript into Perl?

From: "Luis Guillot" <[EMAIL PROTECTED]> > I don't know how I can execute an event of Javascript into a link in a > program in Perl. This event of JavaScript have executed a function > that return a HTML page. Anybody know how I can it? > > Is it possible do it this?: > $datos=$datos." onMouse

Re: Vexing regex question--storing multiple hits for later use

From: "Daniel J. Tomso" <[EMAIL PROTECTED]> > I'm matching a pattern against a long string, and I want to examine > each occurrence of the match. I know that $& stores the match, but is > there a way to store EVERY match in the string, and then look at them? Dont use $&, it'll slow down ALL rege

Re: Vexing regex question--storing multiple hits for later use

"Daniel J. Tomso" wrote: > > Greetings. > > I'm matching a pattern against a long string, and I want to examine each > occurrence of the match. I know that $& stores the match, but is there > a way to store EVERY match in the string, and then look at them? > > Example: > > $str = "This is a v

How I can execute Javascript into Perl?

I don't know how I can execute an event of Javascript into a link in a program in Perl. This event of JavaScript have executed a function that return a HTML page. Anybody know how I can it? Is it possible do it this?: $datos=$datos.""; What is bad in this code? Thank you very much. Lui

autorun

How can I scheduler a cgi script? -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Re: read data from post or get ...

heres a url that should help you out. http://www.cgi101.com/class/ Farshad Fekri Nejat wrote: > hi > how can i read data which be sent from a form in > html file by post or get ? for example in a form > i want get fist and last name of user and show those > by > a perl file .. > thanks > bye > >

Vexing regex question--storing multiple hits for later use

Greetings. I'm matching a pattern against a long string, and I want to examine each occurrence of the match. I know that $& stores the match, but is there a way to store EVERY match in the string, and then look at them? Example: $str = "This is a very long string, isn't it?" If I want to matc

Re: moving data from text file to db

tom poe wrote: > > Hi: I have a script that connects to my PostgreSQL7.0.3 OK. > > Now, I also have text files that contain: > column_name: data > > I want to open the database, open the file, read each line that has a > column_name followed by a colon and space, then the data, and move it > t

Re: read data from post or get ...

The data is in the %ENV hash, the key is QUERY_STRING but it only works with GET and can give you some problem with GET as well. What I'd recomend is some reading about the CGI module, either the 'perldoc CGI', online info or the chapter about cgi in learning perl. /Jon farshad fekri nejat wro