Re: Get Script to run same time each day automatically

2002-10-16 Thread John W. Krahn
Colin Johnstone wrote: > > Gidday from Downunder, Hello, > Is it possible to write a script that runs automatically at the same time each day. Yes. If you are running *nix use crontab. man crontab John -- use Perl; program fulfillment -- To unsubscribe, e-mail: [EMAIL PROTECTED] For ad

Re: Getting A File Name

2002-10-16 Thread John W. Krahn
Ken Cole wrote: > > Hi, Hello, > I have a directory in which there are files such as: > > fred.1 > fred.2 > fred.3 > > The suffix increases and older files get deleted so there are always 3 fred.* > files in the directory at any one time. > > I need to get the name of the file with the highe

RE: Get Script to run same time each day automatically

2002-10-16 Thread Johnstone, Colin
Thanks Vinai, I will talk to our server team Colin Johnstone Website Project Officer Corporate Website Unit Public Affairs Directorate NSW Department of Education and Training AUSTRALIA ph 9561 8643 -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROT

Get Script to run same time each day automatically

2002-10-16 Thread Johnstone, Colin
Gidday from Downunder, Is it possible to write a script that runs automatically at the same time each day. Why you might ask? You see we want to send out a newsletter notifying journalists of our latest press releases. The newsletters are generated automatically by our CMS (Interwoven Teamsit

Re: Newbie Question

2002-10-16 Thread Dharmender Rai
Montana , Read the ## part in ur attached mail below: --- montana <[EMAIL PROTECTED]> wrote: > So looking at the following package: > { package Horse; >@ISA = qw(Animal); >sub sound { "neigh" } >sub name { > my $self = shift; > $$se

Re: generating a new web page

2002-10-16 Thread Josimar Nunes de Oliveira
Hi, Shane, You should write a first html page with a form that use an action to a script, like this: Página Teste The script "../scripts/test.pl" may have a content like this: print "HTTP/1.0 200 OK\n"; print "Content-Type: text/html\n\n"; print ''; print ''; print 'Processed'; p

RE: Getting A File Name

2002-10-16 Thread Ken Cole
Thanks Vinai, For the code and the explanations. Ken > -Original Message- > From: vinai AR [mailto:[EMAIL PROTECTED]] > Sent: Thursday, October 17, 2002 1:54 PM > To: Ken Cole; [EMAIL PROTECTED] > Subject: RE: Getting A File Name > > > I think this script will help u. > Assume that u

generating a new web page

2002-10-16 Thread Shane Laffin
Hello All, This is my first web perl program. I want the user to select an option from a drop down menu, then click submit. The program should then go to a new web page to display the results. The below code displays all the info on the one page, how do I move to new web pages. I want to build

RE: Getting A File Name

2002-10-16 Thread vinai AR
I think this script will help u. Assume that u r in the directory where u have these three files.(If not use chdir and move to that directory). @file_List = On executing the above statement @file_List will have all the three files fred.*. map {$_ =~ s/fred.//} @file_List The above statement r

Getting A File Name

2002-10-16 Thread Ken Cole
Hi, I have a directory in which there are files such as: fred.1 fred.2 fred.3 The suffix increases and older files get deleted so there are always 3 fred.* files in the directory at any one time. I need to get the name of the file with the highest suffix so I can go and do some other stuff w

Re: Perl and IIS 5.0

2002-10-16 Thread chris
You may find this link to be useful http://support.microsoft.com/default.aspx?scid=KB;EN-US;Q245225&LN=EN-US&SD=gn&FR=0&qry=perl&rnk=19&src=DHCS_MSPSS_gn_SRCH&SPR=IIS On Wed, 16 Oct 2002 21:26:05 -0300, [EMAIL PROTECTED] (Josimar Nunes De Oliveira) wrote: >Hello, >Does anybody know how to confi

Re: Problem with redirection

2002-10-16 Thread Steve Grazzini
Steve Grazzini <[EMAIL PROTECTED]> wrote: > Vishal Mittal <[EMAIL PROTECTED]> wrote: >> >> I am encountering a problem with this piece of code >> that I have written for forking multiple processes and >> making all the child processed communicating with the >> parent process... >> >> ***

Re: Problem with redirection

2002-10-16 Thread Steve Grazzini
Vishal Mittal <[EMAIL PROTECTED]> wrote: > > I am encountering a problem with this piece of code > that I have written for forking multiple processes and > making all the child processed communicating with the > parent process... > > ** > > my($

Perl and IIS 5.0

2002-10-16 Thread Josimar Nunes de Oliveira
Hello, Does anybody know how to configure Microsoft IIS 5.0 (W2KProf) to run perl scripts? Thanks, Josimar

Re: comparing two hashes

2002-10-16 Thread Janek Schleicher
Gary Egleton wrote: > can any one point me at how to compare two hases. You can also use a CPAN module, e.g. use Data::Compare; if (Compare(\%hash1, \%hash2)) { # hashes are equal } else { # they arent } Greetings, Janek -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional c

Re: a newbies attempt at cleverness are failing

2002-10-16 Thread Janek Schleicher
George Schlossnagle wrote: > my $size; > $out =~ /(\d+)/ && $size = $1; > > Regular expressions are good for this sort of task. Yes, especially as it can be written in a very natural way: my ($size) = $out =~ /(\d+)/; Please note that the (...) around $size are important to force list context

Re: Who sees what?

2002-10-16 Thread Wiggins d'Anconia
http://perl.plover.com/FAQs/Namespaces.html The first "my" holds for the whole block (the whole file in this case). The second instance of "private" is only available inside "sub1" and not deeper than "sub1", aka not in "sub2". Read the article, it explains it much better than I can. http://

Re: Who sees what?

2002-10-16 Thread Jeff 'japhy' Pinyan
On Oct 16, chris said: >my $private = new $class; >&sub1 ($private); > >sub1{ >(my $private) = @_; >&sub2; >} > >sub2{ >$private->dothis; #??? THIS is the $private you declared OUTSIDE of sub1(). Both $privates happen to point to the same referent. -- Jeff "japhy" Pinyan [EMAIL PROTECTED

Who sees what?

2002-10-16 Thread chris
I am surprise that a private variable is accessible by a sub. Consider this my $private = new $class; &sub1 ($private); sub1{ (my $private) = @_; &sub2; } sub2{ $private->dothis; #??? } -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Re: Microsoft Access Question

2002-10-16 Thread Josimar Nunes de Oliveira
Take the following steps: # 1) Install Modules DBI and ODBC: Microsoft Windows 2000 [Versão 5.00.2195] (C) Copyright 1985-2000 Microsoft Corp. D:\Perl>ppm PPM> install DBI Install package 'DBI?' (y/N): y Installing package 'DBI'... Bytes transferred: 368671

Getting Columns

2002-10-16 Thread Brady Fausett
All, I recently was reading a posting regarding getting table names and then retrieving colmn names from another post. I have been trying to make a perl program that I have written (with DBI) to be more object oriented. To be able to get column names would be a great help. I have the Perl D

Re: SIMPLE regex expression comparison !! - What am I doing wrong?

2002-10-16 Thread John W. Krahn
Lance Murray wrote: > > Hello Hello, > I'm trying to write a simple script to test if a port is up or down. It all > depends on being able to parse for the word "Connected" in an array. Try as > I might, I can't figure out why the following regex comparison won't work. Perhaps you need the

Re: More Newbie OOP Questions ...

2002-10-16 Thread Paul Johnson
On Tue, Oct 15, 2002 at 09:26:33PM -0500, montana wrote: > Take the following example from the perlboot manual: > { package Horse; >@ISA = qw(Animal); >sub sound { "neigh" } >sub name { > my $self = shift; > $$self; >} >

RE: Microsoft Access Question

2002-10-16 Thread Beau E. Cox
Cleiton - Have you tried ODBC? There is a perl DBD for it. Check CPAN Aloha => Beau. -Original Message- From: Cleiton L. Siqueira [mailto:[EMAIL PROTECTED]] Sent: None To: [EMAIL PROTECTED] Subject: Microsoft Access Question Dear, I need to retrieve data from Microsoft Access databas

RE: SIMPLE regex expression comparison !! - What am I doing wrong?

2002-10-16 Thread Beau E. Cox
Hi - 1) try: if ($reply[1] =~ /Connected/) { ... I _think_ w/o parens, Perl says: if $reply[1] => true true =~ /Connected/ => false (you also may have to have the m in m/Connected/ 2) whole array: for (@reply) { if (/Connected/) { ... OK ... last; } } 3) after having read

Getting Columns

2002-10-16 Thread Brady Fausett
All, I recently was reading a posting regarding getting table names and then retrieving colmn names from another post. I have been trying to make a perl program that I have written (with DBI) to be more object oriented. To be able to get column names would be a great help. I have the Perl D

Re: Microsoft Access Question

2002-10-16 Thread Jenda Krynicky
From: "Cleiton L. Siqueira" <[EMAIL PROTECTED]> > I need to retrieve data from Microsoft Access database and put them in > a PostgreSQL database. I got to access PostgreSQL normally, but I > can't open a Microsoft Access database using perl. Someone knows how > can I do it? Wha

Re: SIMPLE regex expression comparison !! - What am I doing wrong?

2002-10-16 Thread Jeff 'japhy' Pinyan
On Oct 16, Lance Murray said: >#!/bin/perl You should get used to using 'strict' and warnings #!/bin/perl -w use strict; >$host = @ARGV[0]; That should be $ARGV[0]. >$port = @ARGV[1]; Why not: my ($host, $port) = @ARGV; >@reply = `echo " " | telnet $host $port`; >if $reply[1] =~ /Co

RE: Stupid newbie question.

2002-10-16 Thread Casto, Bryan J
$i is generally used as a counter or increment variable. It isn't a special variable. Most of the time you'd see it in something like this: Until ($i == 100) { # do this 100 times ...do something $i++;# increment $i by 1 } HTH Bryan J. Casto bryan . casto (a) marshall . edu

SIMPLE regex expression comparison !! - What am I doing wrong?

2002-10-16 Thread Lance Murray
Hello I'm trying to write a simple script to test if a port is up or down. It all depends on being able to parse for the word "Connected" in an array. Try as I might, I can't figure out why the following regex comparison won't work. if $reply[1] =~ /Connected/ { The code snippet is as fol

Microsoft Access Question

2002-10-16 Thread Cleiton L. Siqueira
Dear, I need to retrieve data from Microsoft Access database and put them in a PostgreSQL database. I got to access PostgreSQL normally, but I can't open a Microsoft Access database using perl. Someone knows how can I do it? Thanks! Cleiton L. Siqueira Colégio Monjolo [EMAIL PROTEC

Re: getting file on STDIN, howto process GLOB

2002-10-16 Thread John W. Krahn
Zentara wrote: > > Hi, Hello, > I'm looking at a script that takes a file on STDIN. perldoc -q "How can I read in an entire file all at once" Found in /usr/lib/perl5/5.6.0/pod/perlfaq5.pod How can I read in an entire file all at once? > ### > #!/us

Re: Converting IO::Handle to filehandle

2002-10-16 Thread John W. Krahn
Vishal Mittal wrote: > > Hi, Hello, > I have something like this > > my $child = new IO::Handle; > > When I try to redirect this handle to a filehandle > using > > open(MY_DESCRIPTOR, ">&$child"); ">&" means to duplicate an existing file handle. > it gives me an error. What is it that I a

Re: creating a string on the fly

2002-10-16 Thread Vincent Lee
Here's the code: sub GetColumns{ my @columns=""; $statement=uc("SELECT colname from syscat.columns where tabname='$_[0]' and tabschema='$sch' ORDER BY colno"); $s=$dbHandle->prepare("$statement") or die "Select error. Check the syntax\n"; $s-> exe

Re: creating a string on the fly

2002-10-16 Thread Vincent Lee
--- Rob <[EMAIL PROTECTED]> wrote: > Sorry Vincent I'm not sure what you're meaning. > > You've written GetColumns ($table). Does it return > an array of column names > as it should? > - Original Message - > From: "Vincent Lee" <[EMAIL PROTECTED]> > To: "Rob" <[EMAIL PROTECTED]> > Cc: <[

Re: a newbies attempt at cleverness are failing

2002-10-16 Thread John W. Krahn
Chad Kellerman wrote: > > Hi everyone, Hello, > I know there must be a easy way to do this but I just can't figure it > out. I issue a command from a remote server and get a variable like so: > > my $out = 14G; # actually it's 14G\n > > I am trying to get just a numeric out oif it: I just wa

Re: Stupid newbie question.

2002-10-16 Thread Jason Tiller
Hi, Coe, :) On Wed, 16 Oct 2002, coe smythe wrote: > Can some one please explain $i to me? It is my understanding that > this is one of those special little variables. Sorry, and thanks. This isn't a stupid question... however, if you provided a little more context, perhaps we might be of mor

Re: comparing two hashes

2002-10-16 Thread John W. Krahn
Gary Egleton wrote: > > Hi, Hello, > can any one point me at how to compare two hases. > > ie > > hash1 > 1 abc > 2 def > 3 ghi > > hash2 > 1 abc > 2 defzzz > 3 ghi > > I want to take the values for matching keys and see if they are the same i

Stupid newbie question.

2002-10-16 Thread coe smythe
Can some one please explain $i to me? It is my understanding that this is one of those special little variables. Sorry, and thanks. __ Do you Yahoo!? Faith Hill - Exclusive Performances, Videos & More http://faith.yahoo.com -- To unsubscribe, e-

RE: Off topic

2002-10-16 Thread Nikola Janceski
Google groups: http://groups.google.com/groups?sourceid=navclient&ie=UTF-8&oe=UTF-8&q=linux +admin that should have been your first guess. > -Original Message- > From: Anidil Rajendran-Raj [mailto:[EMAIL PROTECTED]] > Sent: Wednesday, October 16, 2002 4:08 PM > To: [EMAIL PROTECTED] > S

Off topic

2002-10-16 Thread Anidil Rajendran-Raj
Hi, Sorry to ask this OT question. But i am sure I can get help here. I was looking for a good Linux admin mailing list. Thanks in advance

Re: file to file copy

2002-10-16 Thread Rob
Ah, now that's a different kettle of fish. (English fish kettles are a bit like American ball parks. Je ne sais pas la métaphore Française. ;) File1 is a list of key/value pairs which should be used to modify File2 such that 1/ Every line in File2 which has a key matching one of those in File1 t

Re: Help me on concurant comiunication

2002-10-16 Thread James Edward Gray II
Your code pretty much works, on my system. It issues a warning about the $pid variable, but that's because you aren't using it. It services connections just fine, but you forgot to exit the child so it doesn't loop back to that accept() call on it's closed listen socket. One small change fi

Re: a newbies attempt at cleverness are failing

2002-10-16 Thread George Schlossnagle
my $size; $out =~ /(\d+)/ && $size = $1; Regular expressions are good for this sort of task. chad kellerman wrote: >Hi everyone, > >I know there must be a easy way to do this but I just can't figure it >out. > >I issue a command from a remote server and get a variable like so: > >my $out = 14G;

Re: How to use a module located relative to the current script

2002-10-16 Thread Rakhitha Malinda Karunarathne
check in the paths in each cells @INC array for the file u want in the array cell assending order fist maching file is the loaded one like this if any body have a better way to check existents of a file please send $file_to_search='sos.pl'; # Your file to find for($c=$#

a newbies attempt at cleverness are failing

2002-10-16 Thread chad kellerman
Hi everyone, I know there must be a easy way to do this but I just can't figure it out. I issue a command from a remote server and get a variable like so: my $out = 14G; # actually it's 14G\n I am trying to get just a numeric out oif it: I just want the 14: I have been tried a lot of things

Re: Help me on concurant comiunication

2002-10-16 Thread Rakhitha Malinda Karunarathne
i tried it too but after creating the child process the main process comes back and start to listne in line $client=$sockHandle->accept()){ then all the child processes blocks i have atached my code with this please tel me if there is an error in line - Original Message - From: "James E

RE: How to use a module located relative to the current script

2002-10-16 Thread Jenda Krynicky
From: "Reinstein, Shlomo" <[EMAIL PROTECTED]> > Thanks. However, I think this module won't help me. You see, > "some_path/lib/sos.pl" is not the "original" (bin) script, but rather > it's a library of routines used by many "original" scripts. That is to > say, users don't run "pe

Re: Help me on concurant comiunication

2002-10-16 Thread James Edward Gray II
Again, this is very complicated, so I can really only give basic theory. The usual strategy of forking servers is to fork just after they receive a connection. The main loop usually looks close to: while (my $c = $socket->accept) { my $child = fork; die unless defined $child;

getting file on STDIN, howto process GLOB

2002-10-16 Thread zentara
Hi, I'm looking at a script that takes a file on STDIN. ### #!/usr/bin/perl my $input = \*STDIN; print "$input\n"; ## If I run it "script < somefile" the result is GLOB(0x123ab458) What can you do with that GLOB? For inst

Converting IO::Handle to filehandle

2002-10-16 Thread vishal mittal
Hi, I have something like this my $child = new IO::Handle; When I try to redirect this handle to a filehandle using open(MY_DESCRIPTOR, ">&$child"); it gives me an error. What is it that I am doing wrong ?? Thanks -V __ Do you Yahoo!? Faith H

RE: How to use a module located relative to the current script

2002-10-16 Thread Reinstein, Shlomo
Thanks. However, I think this module won't help me. You see, "some_path/lib/sos.pl" is not the "original" (bin) script, but rather it's a library of routines used by many "original" scripts. That is to say, users don't run "perl some_path/lib/sos.pl", but rather they run some other script which kn

Re: How to use a module located relative to the current script

2002-10-16 Thread James Edward Gray II
I stand corrected. My apologies. James On Wednesday, October 16, 2002, at 11:10 AM, Jenda Krynicky wrote: > From: James Edward Gray II <[EMAIL PROTECTED]> > >> use Path::To::Module; > > Beg::Your::Pardon? > > 1) this will not help him. This'll cause perl to search for Module.pm > in all Path/

Re: Help me on concurant comiunication

2002-10-16 Thread Rakhitha Malinda Karunarathne
yes my server forks once the server starts it connects to a socket and starts to listen. then create processes as much as possible (about 50) but when one process reach the line >> while($client=$sockHandle->accept()){ #lines to handle the client } all the other processes blocks so the probl

Re: File::Find::find problem.

2002-10-16 Thread Jenda Krynicky
> > Script purpose: > > I am trying to search an extremely large mounted dir on NT and find > > the location of any file or dir that starts with a certain string > > that is given on command line. > > > > Problem: > > File::Find::find({wanted => \&wanted}, 'e:\\'); > > There is something about th

RE: How to use a module located relative to the current script

2002-10-16 Thread NYIMI Jose (BMB)
Use FindBin module. The advantage is that FindBin module belongs to standard distribution Your "some_path"/lib/sos.pl script will look like: #!/usr/bin/perl -w use strict; use FindBin qw($Bin) # so $Bin contains your "some_path"/lib #from here TMTWOTDI, one way is to pick up "some_path" from $Bi

Re: How to use a module located relative to the current script

2002-10-16 Thread Jenda Krynicky
From: James Edward Gray II <[EMAIL PROTECTED]> > use Path::To::Module; Beg::Your::Pardon? 1) this will not help him. This'll cause perl to search for Module.pm in all Path/To subdirectories of directories in @INC. But he needs to add something to @INC. 2) If you do this the module will most

File::Find::find problem.

2002-10-16 Thread Wert, Nathaniel
> Script purpose: > I am trying to search an extremely large mounted dir on NT and find the location of >any file or dir that starts with a certain string that is given on command line. > > Problem: > File::Find::find({wanted => \&wanted}, 'e:\\'); > There is something about this line that is ju

RE: How to use a module located relative to the current script

2002-10-16 Thread NYIMI Jose (BMB)
Use FindBin module. The advantage is that FindBin module belongs to standard distribution Your "some_path"/lib/sos.pl script will look like: #!/usr/bin/perl -w use strict; use FindBin qw($Bin) # so $Bin contains your "some_path"/lib #from here TMTWOTDI, one way is to pick up "some_path" from $Bi

Re: comparing two hashes

2002-10-16 Thread Chas Owens
On Wed, 2002-10-16 at 09:54, Egleton, Gary wrote: > Hi, > > can any one point me at how to compare two hases. > > ie > > hash1 > 1 abc > 2 def > 3 ghi > > hash2 > 1 abc > 2 defzzz > 3 ghi > > I want to take the values for matching keys and see if they are t

Re: How to use a module located relative to the current script

2002-10-16 Thread James Edward Gray II
use Path::To::Module; On Wednesday, October 16, 2002, at 10:05 AM, Reinstein, Shlomo wrote: > Hi, > From some perl script, say "some_path/lib/sos.pl", I would like to > make use > of a perl module, which is located at "some_path/modules". I don't > know what > "some_path" is inside "sos.pl",

Re: comparing two hashes

2002-10-16 Thread Frank Wiles
.--[ Ned Cunningham wrote (2002/10/16 at 11:38:07) ]-- | | How would you write to those 2 hashes??? | I'm not quite sure what you mean by this. You can update the value at a certain key at anytime by simply assigning something to it like $hash1{2} = 'foobar'; Th

RE: comparing two hashes

2002-10-16 Thread Nikola Janceski
but this only works if each hash has the same keys. if one hash might have more/less keys than the other use this: my %seen; foreach ( grep !$seen{$_}++, (keys %hash1, keys %hash2) ) { next if $hash1{$_} eq $hash2{$_}; print "key: $_ - hash1: $hash1{$_} - hash2: $hash2{$_}\n"; #

Re: Newbie Question

2002-10-16 Thread montana
So looking at the following package: { package Horse; @ISA = qw(Animal); sub sound { "neigh" } sub name { my $self = shift; $$self; } sub named { my $class = shift; my $name = shift;

How to use a module located relative to the current script

2002-10-16 Thread Reinstein, Shlomo
Hi, >From some perl script, say "some_path/lib/sos.pl", I would like to make use of a perl module, which is located at "some_path/modules". I don't know what "some_path" is inside "sos.pl", but I know that I can reach the module using a relative path "../modules". The problem is, writing "use lib

RE: comparing two hashes

2002-10-16 Thread Ned Cunningham
How would you write to those 2 hashes??? -Original Message- From: Frank Wiles [mailto:[EMAIL PROTECTED]] Sent: Wednesday, October 16, 2002 11:25 AM To: Egleton, Gary Cc: [EMAIL PROTECTED]

Re: comparing two hashes

2002-10-16 Thread Frank Wiles
.--[ Egleton, Gary wrote (2002/10/16 at 14:54:57) ]-- | | Hi, | | can any one point me at how to compare two hases. | | ie | | hash1 | 1 abc | 2 def | 3 ghi | | hash2 | 1 abc | 2 defzzz | 3 ghi | | I want to take the values

Re: comparing two hashes

2002-10-16 Thread James Edward Gray II
Something like: foreach (keys %hash1) { next if $hash1{$_} eq $hash2{$_}; print "$hash1{$_} $hash2{$_}\n"; } On Wednesday, October 16, 2002, at 08:54 AM, Egleton, Gary wrote: > Hi, > > can any one point me at how to compare two hases. > > ie > > hash1 > 1 abc > 2 d

Re: converting to CSV

2002-10-16 Thread James Edward Gray II
Well, I don't know if this is exactly what you were looking for, but hopefully it's at least enough to get you started. You can run it with: perl convert.pl IN_FILE >OUT_FILE I couldn't see how the Feature, Modification Date, and Last Modified fields were being used in the new format, so th

comparing two hashes

2002-10-16 Thread Egleton, Gary
Hi, can any one point me at how to compare two hases. ie hash1 1 abc 2 def 3 ghi hash2 1 abc 2 defzzz 3 ghi I want to take the values for matching keys and see if they are the same if not write out the value so in the above the values in 1 and

RE: Backup Program?

2002-10-16 Thread Kipp, James
Take a look at File::Copy > -Original Message- > From: Steve Gross [mailto:[EMAIL PROTECTED]] > Sent: Wednesday, October 16, 2002 1:33 AM > To: [EMAIL PROTECTED] > Subject: Backup Program? > > > Does anyone out there have a program that will back up > windows files from > one drive to

Re: Trying to strip HTML tags

2002-10-16 Thread Jenda Krynicky
From: Graig Warner <[EMAIL PROTECTED]> > I have a CGI script that tries to remove the tags from a string that > represents the content of an HTML file. > > There are a number of tags that I would like to keep intact, and I > represent them in the following array: > > @INCLUDE_T

Re: file to file copy

2002-10-16 Thread Jean Padilla
Hi, Christophe I suggest the following (see attached file: modcfg) Hope this helps. folschette a écrit : > > hi again, > and which i forgot to say: while merging file1 into file2 , no key should be > double, the right key is the one in file1!! > > so in fact it is a replacement of some lines i

Re: Newbie Question.

2002-10-16 Thread Dharmender Rai
[1] pop takes out the elements from the right end of the array while shift does that from the left end. [2]When there is one element then the above mentioned functions will give you the same result :) [3] Yes, your notion about "my" is correct but for more information go through the man pages on w

RE: Backup Program?

2002-10-16 Thread Duarte Cordeiro
In linux you can use: cp -a In almost any other unix (including linux): Cp -dpR -- Duarte Manuel Cordeiro -Original Message- From: folschette [mailto:[EMAIL PROTECTED]] Sent: Wednesday, October 16, 2002 8:19 AM To: [EMAIL PROTECTED] Subject: RE: Backup Program? hi and how do this

RE: Newbie Question.

2002-10-16 Thread Duarte Cordeiro
Hi, don't know much about oo in perl, but a "regular" sub: >From man perlsub: [...] All functions aree passead as parameters one single flat list os scalars. [...] Any arguments passed in show up in the array '@_'.Therefor, if you called a function with two arguments, those would be stored in '$

Re: Couple of qustions...

2002-10-16 Thread John W. Krahn
Fogle Cpl Shawn B wrote: > > How would I go about going to a previous line? Save the previous line in a variable or use tell() and seek() to reposition the file pointer. > I would also like to do several regexp's against a scalar value...something > like this (hopefully you know a way for me t

Re: file to file copy

2002-10-16 Thread folschette
hi again, and which i forgot to say: while merging file1 into file2 , no key should be double, the right key is the one in file1!! so in fact it is a replacement of some lines in file2 by some lines in file1, and the lines that don't exist yet in file2 are appended. thanx, christophe folschett

RE: Mailing from Windows 98

2002-10-16 Thread Timothy Johnson
Emailing using Perl on a Windows system is pretty much the same as emailing on any system, provided that you have access to an SMTP server. If you know the DNS name or address of your SMTP server, then check out the following modules: Mail::SendMail; Mail::Sender; Net::SMTP; (I might have the

RE: Newbie Question.

2002-10-16 Thread Timothy Johnson
Yes, shift operates on @_ by default, which is also the array that contains all arguments passed to the subroutine. You are probably right that "Sheep" is the only item in the list, due to the shift/pop behavior you mentioned. -Original Message- From: montana [mailto:[EMAIL PROTECTED]]

Re: creating a string on the fly

2002-10-16 Thread Rob
Sorry Vincent I'm not sure what you're meaning. You've written GetColumns ($table). Does it return an array of column names as it should? - Original Message - From: "Vincent Lee" <[EMAIL PROTECTED]> To: "Rob" <[EMAIL PROTECTED]> Cc: <[EMAIL PROTECTED]> Sent: Tuesday, October 15, 2002 11:0

RE: Backup Program?

2002-10-16 Thread Pablo Jejcic (cmspj)
In which Unix? ex. rcopy rsync a GUI solution using the File Manager and mounting the disks using NFS/Samba etc Pablo.- -Original Message- From: folschette [mailto:[EMAIL PROTECTED]] Sent: 16 October 2002 08:19 To: [EMAIL PROTECTED] Subject: RE: Backup Program? hi and how do this in

CGI for ftp?

2002-10-16 Thread Angerstein
Hello, I am searching for an Perl/CGI for up/downloading and editing files on an ftp-server via http-interface. Has somebody made such a programm? I made a programm for editing files on the server via http. Thanks. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail:

Re: excluding @@

2002-10-16 Thread Sudarshan Raghavan
On Fri, 11 Oct 2002, david wrote: > Sudarshan Raghavan wrote: > > > > >> $ perl -Mstrict -wle'@+ = qw/b c d/;(my $name = q/a b c d efg/) =~ > >> s/@+//; print $name' a b c d efg > > > > When I run this on 5.8.0 it gives out a 'Modification of a read only > > attempted...' Same with 5.6.1

RE: Backup Program? [OT]

2002-10-16 Thread Jeff AA
> -Original Message- > From: folschette [mailto:[EMAIL PROTECTED]] > Sent: 16 October 2002 08:19 > To: [EMAIL PROTECTED] > Subject: RE: Backup Program? > > > > hi > and how do this in unix? > cio OT as this is not Perl A nice easy option is rsync http://www.google.com/search?sourc

Re: file to file copy

2002-10-16 Thread folschette
hi again, i've got some problems using your script: best is if i give you the three files so here they are file1 should be merged in file2 but file2 should have the same layout as befor merging christophe folschette Rob wrote: > Christophe > > I think using Tie::File is overkill here. Try

Trying to strip HTML tags

2002-10-16 Thread Graig Warner
Hi all, I have a CGI script that tries to remove the tags from a string that represents the content of an HTML file. There are a number of tags that I would like to keep intact, and I represent them in the following array: @INCLUDE_TAGS = ( "I", "BR", "SUP", "FONT", "P" ); However, some of the

Couple of qustions...

2002-10-16 Thread Fogle Cpl Shawn B
How would I go about going to a previous line? I would also like to do several regexp's against a scalar value...something like this (hopefully you know a way for me to make this shorter!) $next_music_file =~ s/[.]/ /; $next_music_file =~ s/^[0]//; $next_music_file =~ s/.flac//; $next_music_fil

RE: Backup Program?

2002-10-16 Thread folschette
hi and how do this in unix? cio > Hi - > > Just curious - why not use xcopy? Do you want > a GUI? > > Aloha => Beau. > > -Original Message- > From: Steve Gross [mailto:[EMAIL PROTECTED]] > Sent: Tuesday, October 15, 2002 7:33 PM > To: [EMAIL PROTECTED] > Subject: Backup Program? > >

Re: converting to CSV

2002-10-16 Thread pelp
Yahoo! is acting funny. http://www.geocities.com/pelpme/current_format.txt (original file) http://www.geocities.com/pelpme/csv.htm (new format) On Wed, 16 Oct 2002 03:10:12 UT, "pelp" <[EMAIL PROTECTED]> said: > This is the correct link to the CSV file, > http://us.f1.yahoofs.com/users/593

Re: converting to CSV

2002-10-16 Thread pelp
This is the correct link to the CSV file, http://us.f1.yahoofs.com/users/593a164/bc/sample/csv.htm?bchPOr9A0FpGqXUN On Wed, 16 Oct 2002 02:55:34 UT, "pelp" <[EMAIL PROTECTED]> said: > I need some much needed help to do some data munging. I come from a C++ > background (3+ years) and have littl

converting to CSV

2002-10-16 Thread pelp
I need some much needed help to do some data munging. I come from a C++ background (3+ years) and have little experience with PERL (about 2 months). At work today I was given a task to convert 1300+ logs to a new format, and the program is due tomorrow (i know.. how nice?)!!! Currently a log is

More Newbie OOP Questions ...

2002-10-16 Thread montana
Take the following example from the perlboot manual: { package Horse; @ISA = qw(Animal); sub sound { "neigh" } sub name { my $self = shift; $$self; } sub named { my $class = shift; my $name =

Newbie Question.

2002-10-16 Thread montana
I've been looking through the manual perlboot. This is a beginners tutorial on Perl OOP. One of the practice programs in this manual had the following line: my $class = shift; This was located in the subroutine: sub Sheep::s