Difference between Perl,PHP and Python?

No virus found in this outgoing message. Checked by AVG - http://www.avg.com Version: 8.0.175 / Virus Database: 270.9.3/1786 - Release Date: 11/13/2008 6:01 PM -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/

how to convert data available from excel to hash?

Hi all, How to convert data available from excel sheet to hash table? Thanks, Siva -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/

How can we Install Perl in Windows

Hi all, How can we install perl in windows system? Let me know the steps or direct me right document.. before that is it necessary to installing the IIS? Thanks, Siva -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/

Re: How can we Install Perl in Windows

sanket vaidya wrote: Download Latest version of ActivePerl for windows from http://www.activestate.com. Unzip the file. Click on installer.bat Follow the instructions. You require Apache or IIS only for CGI scripting. You can run other programs without that. is that not a free

Re: How can we Install Perl in Windows

sanket vaidya wrote: Yes it is a free download I have downloaded the Active Perl from http://downloads.activestate.com/ActivePerl/Windows/5.10/ActivePerl-5.10.0.1003-MSWin32-x86-285500.msi and tried to install, it says ''This installation page could not be opened.Contact the Application

Re: How can we Install Perl in Windows

sanket vaidya wrote: Open this link: http://www.activestate.com/Products/activeperl/index.mhtml Click on Get ActivePerl. Follow the procedure for download. Try Downloading MSI if u have downloaded AS package or vice-versa I can able to installed now..Its working.. Thanks.. -- To

Re: Compare Excel file

Dr.Ruud wrote: Sivasakthi schreef: Is it possible to compare two excel file by using Perl? Yes, see for example `perldoc -f -s`. Maybe you are interested in the diff of the two binaries? Or do you want to check whether the data in the two files are presented in exactly the same

Compare Excel file

Hi all, Is it possible to compare two excel file by using Perl? Thanks, Siva -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/

Re: Compare Excel file

Gunnar Hjalmarsson wrote: Sivasakthi wrote: Is it possible to compare two excel file by using Perl? Yes. Let me know how to do that.. or direct me to right document. Thanks.. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http

Re: Compare Excel file

Gunnar Hjalmarsson wrote: Sivasakthi wrote: Is it possible to compare two excel file by using Perl? Yes. How can we do that? .. or direct me to right document. Thanks. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http

Re: How can pass hash to subroutine ?

On Fri, 2008-06-13 at 20:08 +0800, Jeff Peng wrote: On Fri, Jun 13, 2008 at 7:50 PM, sivasakthi [EMAIL PROTECTED] wrote: Hi all, how can we pass hash to subroutine? and retrieving the hash in subroutine to print values of hash. Hello, Generally we use a reference. my %hash

How to remove white space from middle of string?

Hi all, How to remove white space from middle of the string? for example, $string=hello world welcome; I want to print helloworldwelcome Thanks, Siva

How can pass hash to subroutine ?

Hi all, how can we pass hash to subroutine? and retrieving the hash in subroutine to print values of hash. Thanks, Siva

ByteLodaer Module for perl 5.10

Hi All, I have installed perl 5.10 in to my Linux(FC9) box. I can't able to detect ByteLoader Module Searching from google i have got the info of ByteLoader is not in build in perl 5.10.. I need rpm or source of ByteLoder module.. Also searched in CPAN ..no use.. could you help me? Thanks,

How perl program execution happened ?

Hi all, It is a very basic question. But i want clear idea about how the perl program execution was happened. I know Perl is a Interpreter language.I need more information about whats going there internally . could you explain or direct me right document? Thanks, Siva

Include PHP file inside the cgi script

Hi all, Is it possible to include php file inside the cgi script?? I need defined php variable (from php files) inside the cgi script.. how can i achieve that?? Thanks, Siva

Include PHP file inside the Perl script

Hi all, Is it possible to include php file inside the perl script?? I need the defined php variable (from php files) inside perl script.. how can i achieve that?? Thanks, Siva

Re: what is ^M at the end of a line?

The 'script' utility output normally has ^M and other control characters embedded in the output. To have all these control characters removed, try: $ col -b script.txt newfile.txt Regards, Siva On Wed, 2008-05-21 at 16:45 +0800, Remy Guo wrote: hi all, i have a text processing script

Multiline comment in Perl

Hi all, How to comment Multiple lines in Perl? Thanks, Siva

Re: Perl-GD module installation

-lfreetype -ljpeg -lpng -lz -lm -lX11 -lXpm /usr/bin/ld: cannot find -lfreetype collect2: ld returned 1 exit status make: *** [blib/arch/auto/GD/GD.so] Error 1 what is the problem ? On Wed, 2008-04-23 at 11:42 -0400, Chas. Owens wrote: On Wed, Apr 23, 2008 at 5:46 AM, sivasakthi [EMAIL

Re: Perl-GD module installation

On Wed, 2008-05-07 at 09:31 +0200, Rob Coops wrote: I would say this is the problem: /usr/bin/ld: cannot find -lfreetype At least that is what the compiler says the problem is and I guess it knows better then I do. So time to install the freetype libs. (http://www.freetype.org/)

Re: Perl-GD module installation

GD can be installed with the help of CPAN. http://www.libgd.org/releases/ then, unpack and install tar xvf gd-2.0.35.tar cd gd-2.0.35 ./configure make make install then reinstall the latest GD perl module using cpan: perl -MCPAN -e shell CPANinstall GD -- Affijn, Ruud

Re: removing duplicates

On Tue, 2008-02-05 at 14:40 -0500, obdulio santana wrote: May be this helps perl -lne print if ++$D{$_} == 1 address.txt regards I have tried the above command , but it shows the following error, Can't modify single ref constructor in preincrement (++) at -e line 1, near } ==

Perl-GD module installation

Hi all, I have tried to install the Perl-GD module from source code, it throws following error when i gave make, GD.xs:7:16: gd.h: No such file or directory GD.xs:8:21: gdfontg.h: No such file or directory GD.xs:9:21: gdfontl.h: No such file or directory GD.xs:10:22: gdfontmb.h: No such file

Can't locate object method gif via package GD::Image

Hi all, I have installed Perl-GD , and tried to use the GD::Image it throws the following error message , Can't locate object method gif via package GD::Image how can i eliminate the above error? Thanks,

Re: Can't locate object method gif via package GD::Image

You don't say what platform or version levels you are using, but the best bet is to upgrade to the latest gd c library from boutell.com then install the latest Perl GD module. http://www.boutell.com/gd/ Read the README that comes with the GD module... from the Frequently Asked

Re: Can't locate object method gif via package GD::Image

You don't say what platform or version levels you are using, but the best bet is to upgrade to the latest gd c library from boutell.com then install the latest Perl GD module. http://www.boutell.com/gd/ Read the README that comes with the GD module... from the Frequently Asked

Geting the Host from URL in cgi script

Hi all, I have passed the one URL to cgi script , and i have retrieve the values by using the param method.. the example url is following , http://172.16.2.30:2004/block/blocked.cgi?url=google.comtarget=gambling now i wanted to retrieve the host of http://172.16.2.30:2004/block/blocked.cgi ..

how do check th argument is passing to running file

Hi all, How we can check the argument is passing to the running file or not? #sample.pl 2008 03 i want to check the two arguments of 2008 03 is passed to sample.pl or not.. Thanks,

create multiple hash

Hi all, I want to create multiple hash and retrieve the values for print like below , %values= ( '172.16.1.45' = {'google.com' = 34, 'linux.com' = 45}, '172.15.2.34' = {'hp.com' = 345, 'oracle.com' = 4567}, ); how to do that? Thanks,

How to make all files in one directory to an array

Hi all, How to form array by using the files available in particular directory ? for example, /tmp contains the following files.. #ls /tmp example.txt file1.txt file2.txt file3.txt sample.txt www.txt zzz.txt i want to take all the above files in to one array? how to do that? Thanks, Siva

Perl script running

Hi all, I have running the perl script. In that script i have opened the very large file (2.5GB) and made some calculations.. It running up to 49 minutes after that it stopped the execution.. # time ./test.pl Terminated real49m1.364s user23m23.992s sys 3m46.519s What is the

Re: Perl script running

On Mon, 2007-12-10 at 10:11 +0100, patmarbidon wrote: patmarion has written perhaps you have sme quotas or restriction about CPU usage for a script. Can you have a look in your /var/log/messages just after the perl script stop yes it is stopped due to out of memory ,and the

Assigning javascript variable to perl variable

Hi all, How to assign the javascript variable to perl variable?? Thanks Siva

Check the entered value is single digit or not

Hi all, I have tried to find the entered number is single digit or not.. the code is following, #! /usrbin/perl use strict; use warnings; my $tmp=STDIN; if($tmp =~ m/(\d)/) { printNO IS SINGLE DIGIT\n; } else { printNO IS NOT SINGLE DIGIT\n; } but it always passed the condition even if we

Re: Check the entered value is single digit or not

Try this improvment code: #! /usrbin/perl use strict; use warnings; my $tmp=STDIN; chomp $tmp; # though it's not needed chomp it here, but you'd better to do this. if($tmp =~ /^\d{1}$/) { printIT IS SINGLE DIGIT\n; } else{ printIT IS NOT SINGLE DIGIT\n; } Thank

Re: Checking the two variable

What you've written isn't valid Perl, so I shall have to guess at what you might mean. If you have two strings like this $val1 = '15/Apr/2005:11:46:35 +0300'; $val2 = '12/Nov/2007:14:59:00 +0530'; then you can compare them with eq, like this print equal if $val1 ne $val2;

Check the Number is floating point number or not

Hi All, How to check the number is floating point number or not??? I have tried the code following, #! /usr/bin/perl use strict; use warnings; my $val=124718247874.543; if ($val =~ m#^(\d+)\.(\d\d\d)#; { print it is a float\n; } Thanks, Siva

Checking the two variable

Hi all, I have the two variables, like below, $val1=[15/Apr/2005:11:46:35 +0300]; $val2=[12/Nov/2007:14:59:00 +0530]; I want to check these two variables are equal or not.. I know the method of splitting the each column and compare it.. but it too large.. is it possible to check with easily??

Re: Reading the file using tell and seek method

It sounds as if you really want to know whether the log file has been updated between one invocation of your program and the next. Is that it? (It's helpful to tell us what you want to accomplish, not just how you hope to accomplish it. Storing a byte position into a temporary file is how

How to convert month in name in to digit number

Hi All, How to convert month in name in to digit number, for example the month is Apr then converted in to 04.. how to do that?? Thanks, Siva

How to get teh line before a last from file

Hi All, How to get the line before a last line from file?? Thanks, Siva

Reading the file using tell and seek method

Hi All, I have one requirement, the file content is following, it is a dynamic file, 1194240905.451105 127.0.4.56 TCP_MISS/200 2853 GET cache_object://localhost/info - NONE/- text/plain 1194240905.452 0 127.0.0.1 TCP_MISS/200 2853 GET cache_object://localhost/info - NONE/- text/plain

Re: Reading the file using tell and seek method

); $pos=tell(FH) if/^$$Ltimestamp1/; close FH; open(FH,tmp.txt) || die can't open the file\n; print FH $pos $$Ltimestamp1; close FH; On Wed, 2007-11-07 at 10:38 +0530, sivasakthi wrote: Hi All, I have one requirement, the file content is following, it is a dynamic file, 1194240905.451105

Get the byte position of previous line from last line in file

Hi All, I have the text file as following, this first line this is the second line this the third line this is the fourth line this is the sixth line this is the seventh line while opening and reading that text file, is it possible to get the byte position of this is the sixth line ??

Troubling in seek the file position up to # no of files

Hi all, In my script doing the following requirement, I need to check one temporary file , that file contains the position of the file handle if the temporary file is not present then open abc file and read the datas for some calculation after that update the last line position to the

Re: Troubling in seek the file position up to # no of files

suppose the temporary is present then need to seek the already stored file position from abc file , if the that position is not catched in abc file then will continue the seeking process from abc.0, if also not catched then seeking from abc.1 this is up to abc.10 What do

How to check the file is modified or not?

Hi All, How to check the file is modified or not? Thanks, Siva

Re: Hash Variables

On Mon, 2007-10-29 at 17:06 +0530, Kaushal Shriyan wrote: #!/usr/bin/perl -w %states = ( California,Sacramento, Wisconsin,Madison, New York, Albany); print Capital of California is . $states{California} . \n\n;

undefined symbol: Perl_sv_2iv_flags

Hi All, I have executed the cgi files , It throws the following error in error log, symbol lookup error: /usr/lib/perl5/vendor_perl/5.8.8/i386-linux-thread-multi/auto/GD/GD.so: undefined symbol: Perl_sv_2iv_flags,referer: http://... Perl version is: v5.8.8 perl-Gd rpm is : perl-GD-2.35-1.fc5

Re: Pbm in Sorting the hash

On Fri, 2007-09-21 at 12:47 -0400, Chas. Owens wrote: On 9/21/07, sivasakthi [EMAIL PROTECTED] wrote: Hi all, I have file like that following, site_name access_time www.google.com14:13:04|14:13:04| 172.16.5.49 14:12:10|14:12:56

Pbm in Sorting the hash

Hi all, I have file like that following, site_name access_time www.google.com14:13:04|14:13:04| 172.16.5.49 14:12:10|14:12:56| 172.16.65.53 14:12:41|14:12:58| 172.16.671.35 14:12:29| from the above file i need to print the

is it possible to building the perl pgms by using make/gmake??

Hi guys, is it possible to building the perl programmes by using the make/gmake utility..?? Thanks, Siva

Re: Reading a log file from backwards

On Wed, 2007-09-05 at 07:06 -0400, Chas Owens wrote: On 9/4/07, sivasakthi [EMAIL PROTECTED] wrote: snip Thanks for your suggestions.. but i need to read a file from backwards... First time reading from backwards set the last line position to one variable..next time reading backwards

Reading a log file from backwards

Hi Guys, I have read a log file from backwards, the code is following, #!/usr/bin/perl use strict; use warnings; use File::ReadBackwards; my $bw = File::ReadBackwards-new(/log/path) or die $!; my $line; while (defined($line = $bw-readline)) { print $line; } $bw-close(); In the above

Re: Reading a log file from backwards

snip Unless you really need to read it backwards, I would suggest saving the point you stopped processing by calling tell() on the filehandle and saving the number given to you to a config file and then, on the next run of program, reading the number and calling seek() on the filehandle

Passing variables to subroutine

Hi All, I have tested the following script for reading the log files and write in to the file, #!/usr/bin/perl use strict; use warnings; use File::Tail; my $file=File::Tail-new(/log/path); while (defined(my $line=$file-read)) { my ($time,$lport,$ip,$stats,$rport)=split ,$line; writedata; sub

Problem in opening the file using Tail Module

Hi Guys, I have used the following code to print the log files. but nothing is printed even it doesn't show the warning message, no prompt is returned. what is the mistake in code , could u help me to find the pbm??? #!/usr/bin/perl use strict; use warnings; use File::Tail; my

Re: AW: Problem in opening the file using Tail Module

File::Tail is waiting at least 10 second before starting to work. if it is taking at least 10 second to start then how it is faster than using open to access the file??? On Wed, 2007-08-29 at 11:49 +0200, Angerstein wrote: File::Tail is waiting at least 10 second before starting to work. If

Re: Problem in opening the file using Tail Module

i didn't get your point , please explain little bit more... Thanks, Siva On Wed, 2007-08-29 at 17:55 +0800, Jeff Pang wrote: I tested the codes,which run well for me. Give a try to add '$|++' to disable IO buffer. 2007/8/29, sivasakthi [EMAIL PROTECTED]: Hi Guys, I have used

Re: Problem in opening the file using Tail Module

File::Tail will read only lines that are added to the file after it has been opened. Your program will simply sleep until something new is added. Rob when my log file is updated then it works correctly thanks to all for reply

Spliting the log files

Hi All, I have used the following code to calculate from log files, #!/usr/bin/perl use strict; use warnings; use File::Tail; my $file=File::Tail-new(/log/path); my $line= undef; while (defined($line=$file-read)) { my ($time,$lport,$ip,$stats,$rport) = split; print $ip/n; } The log files is

Re: How to read a very large file??

On Wed, 2007-08-08 at 05:58 -0700, Paul Lalli wrote: On Aug 8, 8:09 am, [EMAIL PROTECTED] (Sivasakthi) wrote: I have a very large file. It may be contain 1lac lines Just FYI, that doesn't mean anything outside of India. You might want to use more conventional numeric notation when

Re: How to read a very large file??

On Wed, 2007-08-08 at 08:12 -0400, Chas Owens wrote: On 8/8/07, sivasakthi [EMAIL PROTECTED] wrote: Hi Guys, I have a very large file. It may be contain 1lac lines.. also it length is increased in dynamically.. Each time ( per 5 min) i need to read the contents from file do some

How to read a very large file??

Hi Guys, I have a very large file. It may be contain 1lac lines.. also it length is increased in dynamically.. Each time ( per 5 min) i need to read the contents from file do some work .. Suppose i have read the lines for first 5 min then after some time it reads the same line also , so it

what is the relation bn Perl version , Perl byteloader OS version

Hi all, what is the relation between Perl version , Perl byteloader OS version?? could u direct me the correct links??? Thanks.

Executing more commands in remote m/c using Net::SSH::perl Modules

Hi All, I have checked the Net::SSH::perl modules, Just i have logged in to the remote machine and executing the command. The code is following, #! /usr/bin/perl use strict; use warnings; use Net::SSH::Perl; my $hostname=xx.xx.xx.xx; my $user=; my $pass=xxx; my $ssh =

What is order of retrieving the values from Hash??

Hi Guys... I have checked the following file.. #!/usr/bin/perl use strict; use warnings; my ($a,$b); my %array = (jan,1,Feb,2,Mar,3); while (($a,$b)= each(%array)) {print $a.$b. \n;} the output is like that, jan1 Mar3 Feb2 What is order of retrieving the values from Hash?? Thanks, Siva

Comparing the Perl encrypted files

Hi Guys, is it possible to comparing the encrypted Perl files?? Thanks, Siva

Re: Comparing the Perl encrypted files

I have mentioned the binary Perl files by encrypted Perl files.. is it not right one? On Fri, 2007-06-15 at 13:56 +0200, Jenda Krynicky wrote: From: sivasakthi [EMAIL PROTECTED] Hi Guys, is it possible to comparing the encrypted Perl files?? Thanks, Siva I'm afraid you'll have

Re: Comparing the Perl encrypted files

text mode: Line endings are translated to/from Perl's end-of-line character \n to the host operating system's end-of-line character (CRLF for DOS based machines, LF for UNIX based machines, etc.) binary mode (aka raw): No translations are made. Characters/bytes are written directly to the

Re: Delete a particular line from file

On Tue, 2007-05-15 at 12:25 +0800, Jeff Pang wrote: sivasakthi 写道: Hi, I have used the file in perl, file contains like that, 1176369096.111468 172.16.2.80 TCP_MISS/200 9629 1176378643.614458 172.16.2.80 TCP_MISS/200 9626 1176378681.984662 172.16.2.75 TCP_MISS/200

Re: Delete a particular line from file

Yes i got it.. it works fine well. Thanks a lots.. Siva Hello, Here you may try to do, while(FF) { chomp; $arrskip{$_} = 1; } chomp would remove newline symbol (on Unix it's \n) reading from the original file. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For

Re: Delete a particular line from file

On Wed, 2007-05-16 at 08:01 -0400, Chas Owens wrote: Assuming that you have a list of IP addresses you want to skip in @ip, you could say #!/usr/bin/perl use strict; use warnings; OUTER: while(FILE) { my ($time, $lport, $ip, $stats, $rport) = split; for my $skip_ip (@ip) {

Re: Delete a particular line from file

On Thu, 2007-05-17 at 07:50 -0400, Chas Owens wrote: Did you type OUTER: while(FILE) { or just while (FILE) { I have used as, OUTER: while (FILE) { Thanks, Siva -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/

Read data in to Hash

Hi, Is it a correct way to read datas in to hash? use strict; use warnings; $userpath = /tmp/sample.txt; open FF, cat $userpath | || die can't access log file\n; while (FF) { %arrskip{$_}=1; } close (FF); Thanks, Siva

Re: Delete a particular line from file

Suppose i have checked the group of I/P addresses for deleting opting then what should i do?? Is there any inbuilt function there for that requirement?? On Tue, 2007-05-15 at 12:25 +0800, Jeff Pang wrote: sivasakthi 写道: Hi, I have used the file in perl, file contains like

Delete a particular line from file

Hi, I have used the file in perl, file contains like that, 1176369096.111468 172.16.2.80 TCP_MISS/200 9629 1176378643.614458 172.16.2.80 TCP_MISS/200 9626 1176378681.984662 172.16.2.75 TCP_MISS/200 9626 1176436396.304 1142 172.16.2.80 TCP_MISS/200 13281 1176436397.228916

How to eliminate the bareword error

Hi Users, I have used following code, #!/usr/bin/perl use strict; use warnings; my $x=param(hhh); my $y=param(sss); my $z=param(ttt); It shows the following error: Bareword sss not allowed while strict subs in use at aaa.cgi line 16. Bareword ttt not allowed while strict subs in use at aaa.cgi

Re: How to eliminate the bareword error

); Yaron Kahanovitch - Original Message - From: sivasakthi [EMAIL PROTECTED] To: beginners@perl.org Sent: Thursday, May 3, 2007 12:30:03 PM (GMT+0200) Auto-Detected Subject: How to eliminate the bareword error Hi Users, I have used following code, #!/usr/bin/perl use strict; use

Re: How to eliminate the bareword error

) { some statements } Thanks, Siva. On Thu, 2007-05-03 at 17:47 +0800, Jeff Pang wrote: 2007/5/3, sivasakthi [EMAIL PROTECTED]: I need to use the Post method for x variable and Get method for y z variable. For that what i do