Single and Double quotes in SQL

Hi! I need to save some HTML text in a DataBase (MySql, using DBI). However some HTML text will have single and double quotes, so.. how can I save them?, for example: It's so funny Thanks! Pablo -- Pablo Fischer Sandoval (pablo -arroba- pablo.com.mx) http://www.pablo.com.mx

Re: DBI Query rows Benchmark

Thanks!!! El día Sunday 07 September 2003 7:59 a Bob Showalter mandó el siguiente correo: > Pablo Fischer wrote: > > Hello! > > > > I have a questionto those lovers of DBI and Databases: which method > > is faster to know the number of rows of a query: > > >

DBI Query rows Benchmark

records, not with 12,000 (or more) that will be the real size of the table. Thanks! -- Pablo Fischer Sandoval ([EMAIL PROTECTED]) http://www.pablo.com.mx http://www.debianmexico.org GPG FingerTip: 3D49 4CB8 8951 F2CA 8131 AF7C D1B9 1FB9 6B11 810C Firma URL: http://www.pablo.com.mx/firmagpg.

WWW::Mechanize and Cookies

uot;user_id", "username"); #Llenamos el campo de password $agent->field("password", "password"); #Le damos ENTER $agent->submit(); Then to enter another website (in the same domain), I jsut: $agent->get("otherurl_of_the_same_domain"); Tha

ProcMail with Perl and MailAudit

d its been filtering with procmail and with my perl filter?, I need to return a special number code? Thanks! Pablo -- Pablo Fischer Sandoval ([EMAIL PROTECTED]) http://www.pablo.com.mx http://www.debianmexico.org GPG FingerTip: 3D49 4CB8 8951 F2CA 8131 AF7C D1B9 1FB9 6B11 810C Firma

Re: MailSender Quotes Problem

I think it was the hour and time.. Cause now im checking what does $this->{SERVER_IP} contains and it contains an ip 192.168.1.43 and I dont have that computer (just from .1 to .4) and thats why I was hanging up :-( Sorry and thanks! Pablo El día Monday 25 August 2003 11:51 a Pablo Fisc

MailSender Quotes Problem

uot;7bit", ctype => "$tipo", }) or die("chale"); $sender->SendLineEnc($mensaje) or die("$Mail::Sender::Error\n"); $sender->Close() or die("$Mail::Sender::Error\n"); Thanks! Cya! Pablo --

Re: [solved again] Parse a big HTML text

I cant believe it.. Every message that I send I get an obvious answer by my self. Thanks and sorry I need to $var =~ s/$s1/$s2/g The cheat its in the 'g'. Thanks! El día Sunday 24 August 2003 7:44 a Pablo Fischer mandó el siguiente correo: > Hi! > > I have in $myvar a BI

Parse a big HTML text

pablo". I have tried with $myvar =~ s/\###1###/$name; But no good results, some ###1### works and others no. Does HTML::Parser will help me? Thanks! -- Pablo Fischer Sandoval ([EMAIL PROTECTED]) http://www.pablo.com.mx http://www.debianmexico.org GPG FingerTip: 3D49 4CB8 8951 F2CA 8131

Re: [solved] Matching String

Again.. Solved.. duh case /^mailaddr/i, just add a ^ before the matched string. thanks! El día Sunday 24 August 2003 5:00 a Pablo Fischer mandó el siguiente correo: > Hi again! > > Im saving some data of a configuration file in scalar var. > > My configuration file has some

Matching String

; } case /replymailaddr/i { $envio_reply = $valor; } } However Im finding a problem here, cause its stopping twice in replymailaddr. (I think that it sounds like mailaddr) So, how can I fix this?, that in each 'case statement' it will mix mailaddr with replymailaddr? Thanks!

Re: [Solved] Save data in array from DB

I solved it :-) @array = split("\n", get_data()); foreach(@array) { parse $_; } Now I can parse each line. Thanks! El día Sunday 24 August 2003 3:44 a Pablo Fischer mandó el siguiente correo: > Hi! > > I would like to parse data from a Field of a table (from a

Save data in array from DB

to save this field and start parsing (selecting data) from each line, like: foreach(@result) { parse $_; } How can I do this? thanks! Pablo -- Pablo Fischer Sandoval ([EMAIL PROTECTED]) http://www.pablo.com.mx http://www.debianmexico.org GPG FingerTip: 3D49 4CB8 8951 F2CA 8131 AF7C

Re: Extract Array Element

Thanks!! El día Sunday 24 August 2003 7:11 a Paul Johnson mandó el siguiente correo: > On Sun, Aug 24, 2003 at 02:01:48PM +0000, Pablo Fischer wrote: > > I have an array of 15 elements, however I dont want the fifth element. > > So, how can I extract it from the array so I would h

Extract Array Element

HI! I have an array of 15 elements, however I dont want the fifth element. So, how can I extract it from the array so I would have 14 elements? Thanks! Pablo -- Pablo Fischer Sandoval ([EMAIL PROTECTED]) http://www.pablo.com.mx http://www.debianmexico.org GPG FingerTip: 3D49 4CB8 8951 F2CA

Re: Benchmark times

Thanks to all! Im going to check the requirements (memory, CPU, etc). Thanks! El día Sunday 24 August 2003 1:45 a Pablo Fischer mandó el siguiente correo: > Hi! > > This maybe its not a Perl question. > > I have a system (with 3 classes), that works in this order: > > >

Benchmark times

and order them * Parse File by File, and save the parssed file in a DB (MySql) * Check to see if I need a backup of the Zip File * Finish How good its to do this in 10 seconds? Exists a website with benckmark running times in Perl? Thanks! -- Pablo Fischer Sandoval ([EMAIL PROTECTED]) http

Split NewLines

Hi! I have in $string something like: $string="1 blabla"; When Im printing $string I get a new line between 1 and blabla, now I needt o split that.. in my($number, $real_string) = split... How can I split it? Thanks! Pd. Its a scalar variable Pablo -- Pablo Fischer Sandov

Removing after a string

ver=192.168.1.1"; thanks! -- Pablo Fischer Sandoval ([EMAIL PROTECTED]) http://www.pablo.com.mx http://www.debianmexico.org GPG FingerTip: 3D49 4CB8 8951 F2CA 8131 AF7C D1B9 1FB9 6B11 810C Firma URL: http://www.pablo.com.mx/firmagpg.txt -- To unsubscribe, e-mail: [EMAIL PROTECTED] For addit

Localtime minutes before or after

, how can I calculate this?. For example If I add 5 minutes to 030817145, I need to get: Sun Aug 17 14:10:21 2003 Thanks!! Pablo -- Pablo Fischer Sandoval ([EMAIL PROTECTED]) http://www.pablo.com.mx http://www.debianmexico.org GPG FingerTip: 3D49 4CB8 8951 F2CA 8131 AF7C D1B9 1FB9 6B11 810C Firma

Questions of OOP in Perl

m confused if I need to use $this for public and private methods or no.. 2. Exists an special nomenclature, like Arrays need to be in capital letters and scalar variables not. Thanks! Pablo -- Pablo Fischer Sandoval ([EMAIL PROTECTED]) http://www.pablo.com.mx http://www.debianmexico.org GPG Fin

Schedule::Cron clean timetable

ple simple examples, (open a file and print something in it, and close it)... and re-running the script but just with this: my $cronometro = new Schedule::Cron(\&dispatcher); $cronometro->clean_timetable(); And the same, it continuse running.. Thanks! Pablo -- Pablo Fischer Sandoval ([EM

System or Modules?

? The final project could be running in two years (or maybe never) in Windows or BSD (Im working in Linux) Yeah, that's my Perl Question :-) thanks! Pablo -- Pablo Fischer Sandoval ([EMAIL PROTECTED]) http://www.pablo.com.mx http://www.debianmexico.org GPG FingerTip: 3D49 4CB8 8

MailSender LineEnc or SendEnc

y => 1, boundary => 'Este-es-un-mensaje-de-puntosclub', debug => 'errores.txt', to => '[EMAIL PROTECTED]', subject => $subject, }) or die("$Mail::Sender::Error\n"); $sender->Open({ encoding => '7bit', ctype =

Re: Questions of OOP in Perl

27;private' methods? Thanks! -- Pablo Fischer Sandoval ([EMAIL PROTECTED]) http://www.pablo.com.mx http://www.debianmexico.org GPG FingerTip: 3D49 4CB8 8951 F2CA 8131 AF7C D1B9 1FB9 6B11 810C Firma URL: http://www.pablo.com.mx/firmagpg.txt -- To unsubscribe, e-mail: [EMAIL PROTECTED] For ad

[New Question] Large file line by line

Hi! Reading all these message about reading a 'big' file (I know that 180MB its not a big file), but what's the difference from reading like this: @file = ; foreach (@file) { print $_; } and with a While? Thanks!! -- Pablo Fischer Sandoval ([EMAIL PROTECTED]) http://w

Procmail with ProcMail Module

good, but before using it, I would like to know the opinions of somebody, and how does the process works in the filter. Thanks! Pablo -- Pablo Fischer Sandoval ([EMAIL PROTECTED]) http://www.pablo.com.mx http://www.debianmexico.org GPG FingerTip: 3D49 4CB8 8951 F2CA 8131 AF7C D1B9 1FB9 6B11 810C

What's Better?

. Save each file in row of a table of my Database (using MySql, so I need to use DBI), and when Its time to use it, connect to the database, and retrieve row by row. Thanks! Pablo -- Pablo Fischer Sandoval ([EMAIL PROTECTED]) http://www.pablo.com.mx http://www.debianmexico.org GPG FingerTip

Re: [solved but..] Push first 9 elements

ush @lista_final, splice(@correos_l, 0, 1); push @lista_final, splice(@correos_t, 0, 1); push @lista_final, splice(@correos_s, 0, 1); push @lista_final, splice(@correos_o, 0, 1); } Thanks! Pablo -- Pablo Fischer Sandoval ([EMAIL PROTECTED]) http://www.pablo.com.mx http://www.debianmexico.

Re: [solved but..] Push first 9 elements

this for Im adding them as: 9 of A, 9 of B, 9 of C, 9 of B So, how can I start selecting one of each one? and complete 9, and again.. and again.. Thanks! -- Pablo Fischer Sandoval ([EMAIL PROTECTED]) http://www.pablo.com.mx http://www.debianmexico.org GPG FingerTip: 3D49 4CB8 8951 F2CA 8131 AF7

Re: [solved but..] Push first 9 elements

splice(@correos_t,0,8); splice(@correos_s,0,8); splice(@correos_o,0,8); } Correct? And now, How can I remove duplicate elements from a list or array. I know that this answer its in perldoc -q duplicate, but I didnt understand the doc. Some examples? Thanks! El día Wednesday 30 July 2003 1

Re: Push first 9 elements

Hi again; Sorry I forgot to said that when I finish to take the first 9 elements of arr7, I need to restart in the ARr1. thats Why I need to remove those elements. Thanks! El día Wednesday 30 July 2003 11:09 a Pablo Fischer mandó el siguiente correo: > Hi! > > I need to make an arra

Push first 9 elements

t 9 of Arr6, push them to the BIG ARRAY and remove this 9 from the 'subarray' Take First 9 of Arr7, push them to the BIG ARRAY and remove this 9 from the 'subarray'. How can I do this? does push and pop allows me to choose the first 9 elements and push them? Thanks! Pablo

Re: Printing an Array

correo); print $host."\n"; $|=1; sleep 1; } $count++; } ;-), However, thanks Pablo -- Pablo Fischer Sandoval ([EMAIL PROTECTED]) http://www.pablo.com.mx http://www.debianmexico.org GPG FingerTip: 3D49 4CB8 8951 F2CA 8131 AF7C D1B9 1FB9 6B11 810C

Printing an Array

r print $correo add print " "; and it prints! Why sleep its ?")#$)"$ my foreach? :-( What it prints without sleep or with the other 'print' is: [EMAIL PROTECTED]@[EMAIL PROTECTED]@domain4.com and ... thanks! Pablo -- Pablo Fischer Sandoval ([EMAIL PROTECTED])

Re: Zip archives

; into one text file all in the current directory. What Rob told you, its exactly what you need, sorry :-) Cya! Pablo -- Pablo Fischer Sandoval ([EMAIL PROTECTED]) http://www.pablo.com.mx http://www.debianmexico.org GPG FingerTip: 3D49 4CB8 8951 F2CA 8131 AF7C D1B9 1FB9 6B11 810C Firma URL: htt

Re: Zip archives

', $this->{DIR_DESCZIP}."/"); #Exit of Zip, just undef $zip (its not necessary) $zip = undef; } And thats all, Your files will be in DIR_DESCZIP, now open the file, and write it to other file (OPEN ">"), (OPEN "<"). Pablo -- Pablo Fischer Sando

Re: Pipe Delimited File

print "Fulanos: $fulanos\n"; > print "Time: $tiempo\n"; > print "Subject: $subject\n"; > print "BodyHTML: $bodyhtml\n"; > print "BodyTXT: $bodytxt\n"; > print "Attachment: $attach\n"; > print "Date: $fech

Re: Pipe Delimited File

ing an array to load the FILE :-( MOVER.CPO 3|Archivo1, Archivo2, ARchivo3|13|COMOESTAS| Special Promotions | Special Promotions |/home/unmada/Programacion/Perl|20030408 Thanks! Pablo -- Pablo Fischer Sandoval ([EMAIL PROTECTED]) http://www.pablo.com.mx http://www.debianmexico.org GPG FingerT

Re: Pipe Delimited File

nd after the last |. Obviously the first word just have an | AFTER it, and th elast, BEFORE it. I think that I need to use split, but see.. no what I need :-( Thanks! Pablo -- Pablo Fischer Sandoval ([EMAIL PROTECTED]) http://www.pablo.com.mx http://www.debianmexico.org GPG FingerTip: 3D49 4

Re: Pipe Delimited File

bject | $attach | $fechaenvio\n"; 1 | Env7371.txt(6) | 1 | 1 | Sales | | 20030408 If subject is Sales, there's no attachment, and $fechaenvio its 20030408. Thanks! -- Pablo Fischer Sandoval ([EMAIL PROTECTED]) http://www.pablo.com.mx http://www.debianmexico.org GPG FingerTip: 3D49 4

Pipe Delimited File

36 | | | | | I tried to change the split, to split(/|/,@file);, but the same, no good results :-( What could I bee doing bad? Thanks! Pablo -- Pablo Fischer Sandoval ([EMAIL PROTECTED]) http://www.pablo.com.mx http://www.debianmexico.org GPG FingerTip: 3D49 4CB8 8951 F2CA 8131 AF7C D1B9 1FB9

Mail Parser?

to know if exists a module that could parse mails, I need to identify the reasons of WHY a mail couldnt be delivered. I found Mail::Box and Mail::Box::Grep (If I remember fine), but exists a module that check only the headers of the messages? Thanks! Pablo -- Pablo Fischer Sandoval ([EMAIL PROTEC

Undef or Destroy?

ke to delete the last FILE_ZIP, so, whats better before loading the filename in FILE_ZIP: $this->{FILE_ZIP} = undef; or delete $this->{FILE_ZIP} Thanks! Pablo -- Pablo Fischer Sandoval ([EMAIL PROTECTED]) http://www.pablo.com.mx http://www.debianmexico.org GPG FingerTip: 3D49 4CB8 89

Destroy Object?

ut, could I do this just like: delete $dbf? or in a simple and quickly way? Thanks! Pablo -- Pablo Fischer Sandoval ([EMAIL PROTECTED]) http://www.pablo.com.mx http://www.debianmexico.org GPG FingerTip: 3D49 4CB8 8951 F2CA 8131 AF7C D1B9 1FB9 6B11 810C Firma URL: http://www.pablo.com.mx/firmagpg.txt

Re: Local variables

use local. Wasn't that easy? funny XD. No, really, now I understand. thanks Steve! Pablo -- Pablo Fischer Sandoval ([EMAIL PROTECTED]) http://www.pablo.com.mx http://www.debianmexico.org GPG FingerTip: 3D49 4CB8 8951 F2CA 8131 AF7C D1B9 1FB9 6B11 810C Firma URL: http://www.pablo.com

Local variables

"bajo") { print "My alias it $person->{NOMBRE}\n"; } } And obviously, 'local $name', was 'my $name' and it was working so nice.. So is it necesary to declare the variables as local vars? Cause Im getting errors :( THankss! Pablo -- Pablo Fisc

Case Statement

($string == "match2") && do { actions.. last CASE; }; and a lot more.. } The question, where does the 'default' case starts?. The last 5 years I have been programming in C/C++/C#/Php.. C-styles languages, so in Perl, where does the 'defa

Save a connection inside an object?

$basedatos_usuario,$basedatos_password); bless($dDB, $clase); return $dDB; } The big question, is it valid to save the 'link connection', inside $dDB->{LINK}?, so I can use it in other methods. Thanks!!! Pablo -- Pablo Fischer Sandoval ([EMAIL PROTECTED]) http://www.pablo.com.mx

Split FileName

e = $col[6]+$col[7]; $time = $col[8]; $fname = $col[9]; Thanks! Pablo -- Pablo Fischer Sandoval ([EMAIL PROTECTED]) http://www.pablo.com.mx http://www.debianmexico.org GPG FingerTip: 3D49 4CB8 8951 F2CA 8131 AF7C D1B9 1FB9 6B11 810C Firma URL: http://www.pablo.com.mx/firmagpg.txt -- To unsubscri

Mail Sender in Perl

http://www.cs.cf.ac.uk/Dave/PERL/node180.html] Pablo Fischer -- Pablo Fischer Sandoval ([EMAIL PROTECTED]) http://www.pablo.com.mx http://www.debianmexico.org GPG FingerTip: 3D49 4CB8 8951 F2CA 8131 AF7C D1B9 1FB9 6B11 810C Firma URL: http://www.pablo.com.mx/firmagpg.txt -- To unsubscribe, e-mail: [EMAIL PROT

Re: Newbie and Perl+Mail Questions

w to manage the queus in sendmail: For example, I send 100 mails in a second to sendmail, but is there a form so that sendmail will take mail 1, and send it now, mail 2 and send it in 3secs, mail 3 and send it in 6 secs, in other words how to send one mail in a specified interval (seconds) Tha

Re: Newbie and Perl+Mail Questions

sleep 1; # Wait 1 second before sending next batch sleed one second.. > } Thanks! I was thinking in this option, but also Im looking for a second option, to know if In sendmail I could manage the threads (to send each mail, each 5 seconds).. I know this is a perl list, but.. does so

Newbie and Perl+Mail Questions

Hi all! My name is Pablo Fischer and Im a little new in Perl, however I have a project where I need to parse mails and send mails: I receive 2 files (contacts and arguments), I get 2000 mail adds from the file, so I need to make packages of 100 mails with differents email adds, When I have