Hi, I wrote following program to send an email to my email id, looks like it is running. But when I checked my mailbox, does not find any email. Can anybody...
Perl function caller should help you out caller EXPR caller Returns the context of the current subroutine call. In scalar context, returns the caller's ...
Arun Pandey
arunp@...
Jul 15, 2009 8:38 am
26674
According to "man perlrun", the "-0777" option sets $/ to 0777 and slurps files whole. This works fine. However, when I did 'local $/="0777"' in a script, it...
Kelly Jones
kelly.terry.jones@...
Jul 15, 2009 1:33 pm
26675
Hi all, How can I stop my find script to go into sub directories and stay in specific directory = "dir2" only? $directory="..\/dir1\/dir2"; @ARGV =...
there is option called $File::Find::prune which if you set in callback function 'wanted' , by using this option you can block the pruned directory . you can...
Hi all, I need help regarding the approach to find out matched and unmatched entries between two files using perl. As the number of lines in the files would be...
Amit Saxena
learn.tech123@...
Jul 16, 2009 9:13 am
26678
Hi Jim, Thanks for the response. I was doing the approach which you have mentioned as the fastest one. I was using nested data structures for the same. The...
Amit Saxena
learn.tech123@...
Jul 16, 2009 2:40 pm
26679
Thank you Vidhut for your help, I would have only one wish left for the perl gurus: to implement a tiny "stop" tag into the line "find(sub {$name{$File:...
... hwitche> I would have only one wish left for the perl gurus: to implement a hwitche> tiny "stop" tag into the line "find(sub {$name{$File: :Find::name} = ...
... The *perlrun *document states that the numeric value of the *-0*command-line feature is an *octal* value. (You can use a hexadecimal value by using...
... You never fail to let me know just how far away I am from being a perl guru or a beginner, for that matter Randall. But I always get hopeful the more your...
Jon Reynolds
jonr@...
Jul 21, 2009 7:26 am
26683
Note: I'm new to using the mailing list - my apologies if I'm doing anything incorrectly. I'm having a problem with parsing some CSV data. I'm using ...
Hi Randal an Jon, I respectfully insist: I still DREAM of a switch in: find(sub {$name{$File::Find::name} = -f;}, @ARGV); For now I have a construction with...
... Hans> Why so much coding when it could be achieved much easier, having somewhere Hans> deeper in the perl machine code a stop switch like "stay" in the ...
Let's say I have this snippet: $_ = "test"; my $thing = "test"; if (/^$thing/) { print "Yah!\n"; } else { print "booo...\n"; } It correctly prints "Yah!". If...
... You need to escape the meta-characters in $thing, but don't change $_. if( /^\Q$thing\E/ ){ See `perldoc perlre` and search for /\\Q/ You can also read...
Shawn H. Corey
shawnhcorey@...
Jul 28, 2009 2:22 pm
26688
... fooguy89> $_="[test]"; fooguy89> my $thing = "[test]"; if (/^\Q$thing/) { .... } See \Q in the docs (I think it's in "perldoc perlre"). -- Randal L....
You can try as below. my $_ = "[test]"; my $thing = "[test]"; $thing =~ s/\[/\\\[/g; if (/^$thing/) { print "Yah!\n"; } else { print "booo...\n"; } Sudhakaran....
... sudha> You can try as below. But \Q handles a lot more than [. And should be the preferred solution. -- Randal L. Schwartz - Stonehenge Consulting...
Hi everyone, I am preparing a script to extract certain data from a file. The file is stored at the location specified in the variable $dir_path below. There...
... nikhil> $dir_path = </abc/def/ghi/pp123456.2.3.4.jk.xyz>; What is this? Not Perl. Some other language? -- Randal L. Schwartz - Stonehenge Consulting...
On Wed, Jul 29, 2009 at 6:45 PM, nikhil ... Generally, the best practice is to use well-tested and thoroughly-designed modules to solve problems like these....
Jeff Soules
soules@...
Jul 30, 2009 4:42 am
26696
Hi Nikhil, hope this will resolve your problem $dir_path = "/abc/def/ghi/pp123456.2.3.4.jk.xyz"; $filename = ($dir_path =~ /(.*)\/(.*)\/(.*)\/(.*)/); $filename...
On Windows, can a file that is deleted with the unlink command be recovered? If so, is there a way in Perl to delete a file so that the deleted file is...
First of all - this is my first post. So just want to know if I'm doing everything right. Then I may suggest a workaround for that problem: - overwrite that...
excuse i think that you must use this function index string , $thing ... From: MAJID AGHA AMINI <amini4@...> Subject: Re: [PBML] Re: Regular Expression...
Having problems with message search?
Fill out this form to ensure your group is one of the first to be migrated to the new message search system.
