|
|
Sponsored Content
Top Forums
UNIX for Dummies Questions & Answers
LWP module ?
Post 3666 by mib on Monday 9th of July 2001 11:36:39 AM
07-09-2001
#!/usr/bin/perl
use File::Find;
foreach $start (@INC) { find(\&modules, $start); }
sub modules {
if (-d && /^[a-z]/) { $File::Find:
rune = 1; return; }
return unless /\.pm$/;
my $filename = "$File::Find::dir/$_";
$filename =~ s!^$start/!!;
$filename =~ s!\.pm$!!;
$filename =~ s!/!::!g;
print "$filename\n";
}
use File::Find;
foreach $start (@INC) { find(\&modules, $start); }
sub modules {
if (-d && /^[a-z]/) { $File::Find:
rune = 1; return; } return unless /\.pm$/;
my $filename = "$File::Find::dir/$_";
$filename =~ s!^$start/!!;
$filename =~ s!\.pm$!!;
$filename =~ s!/!::!g;
print "$filename\n";
}
|
|
10 More Discussions You Might Find Interesting
1. Solaris
My company has a product that is running on JBoss on Solaris against Oracle 8.1.7. We are having an issue with the server process and high CPU utilization. During this time, and only during this time, we are experiencing database locks that will not let go. A 'ps -L' on the server process... (5 Replies)
Discussion started by: hosierdm
5 Replies
2. Shell Programming and Scripting
Hi,
I've a issue in writing a perl script that will automatically monitor the site availability.
There are two different cookies are set in two consecutive flows to a URL and this second cookie has to be passed to the third step which actually gives permission to access based upon the cookie. ... (1 Reply)
Discussion started by: dayanandra
1 Replies
3. Linux
Hi all,
I am working on USB data monitoring on Fedora Core 9. Kernel 2.6.25 has a built-in module (the one that isn't loadable, but compiles and links statically with the kernel during compilation) to snoop USB data. It is in <kernel_source_code>/drivers/usb/mon/.
I need to know if I can... (0 Replies)
Discussion started by: anitemp
0 Replies
4. Shell Programming and Scripting
Hi,
Could some one tell me how to login to any web site and get that page using perl LWP. I heard that we can login to the site using LWP.
I dont want to use WWW:Mechanize as I dont have that module installed on the server.
Appreciate your early response.
Thanks... (8 Replies)
Discussion started by: Anjan1
8 Replies
5. Shell Programming and Scripting
Can some one tell me how to post the username and password using perl LWP. An example is sufficient.. (0 Replies)
Discussion started by: Anjan1
0 Replies
6. UNIX for Dummies Questions & Answers
Hi All,
I'm having a problem when I run the following code for example
perl -e 'use LWP::Simple; getprint "http://google.com"'
Can't locate LWP/Simple.pm in @INC (@INC contains: /System/Library/Perl/5.8.6/darwin-thread-multi-2level /System/Library/Perl/5.8.6... (7 Replies)
Discussion started by: pawannoel
7 Replies
7. Shell Programming and Scripting
Hello all.. i am new to perl scripting.. i wanted to parse a text file, encode the parsed text and attach in url.. please point me to right resources if you know any..This is my major problem. Now i try to get a url running and save it in a text file using LWP module in perl, I used following... (0 Replies)
Discussion started by: empyrean
0 Replies
8. Shell Programming and Scripting
Hi;
Can i have ne sample examples of of using " lwp-request" in shell script.
Is it necessary to have perl installed already in linux box for using this;
Thnks; (2 Replies)
Discussion started by: ajaypadvi
2 Replies
9. Shell Programming and Scripting
I am requesting for the text parsing section below. Any helps are highly appreciated.
<tr valign="top"><td nowrap>Source name</td>
<td style="text-align: justify">Sample Name<br></td>
I want Sample Name from above.
In the same file, I have to search for another pattern like this
<td><a... (1 Reply)
Discussion started by: jacobs.smith
1 Replies
10. Web Development
Hi,
I would like to read content from a https site.
I have decided to use LWP module in perl. but it throwed 401 Authorization required error.
i dont want to hard code the password in my perl code. Is there any way to achieve the authentication without hardcoding the password.
Thanks,... (1 Reply)
Discussion started by: pandeesh
1 Replies
LEARN ABOUT DEBIAN
findorule
FINDORULE(1p) User Contributed Perl Documentation FINDORULE(1p) NAME
findorule - command line wrapper to File::Find::Object::Rule USAGE
findorule [path...] [expression] DESCRIPTION
"findorule" mostly borrows the interface from GNU find(1) to provide a command-line interface onto the File::Find::Object::Rule heirarchy of modules. The syntax for expressions is the rule name, preceded by a dash, followed by an optional argument. If the argument is an opening parenthesis it is taken as a list of arguments, terminated by a closing parenthesis. Some examples: find -file -name ( foo bar ) files named "foo" or "bar", below the current directory. find -file -name foo -bar files named "foo", that have pubs (for this is what our ficticious "bar" clause specifies), below the current directory. find -file -name ( -bar ) files named "-bar", below the current directory. In this case if we'd have omitted the parenthesis it would have parsed as a call to name with no arguments, followed by a call to -bar. Supported switches I'm very slack. Please consult the File::Find::Object::Rule manpage for now, and prepend - to the commands that you want. Extra bonus switches findorule automatically loads all of your installed File::Find::Object::Rule::* extension modules, so check the documentation to see what those would be. AUTHOR
Richard Clamp <richardc@unixbeard.net> from a suggestion by Tatsuhiko Miyagawa Adapted to File::Find::Object::Rule by Shlomi Fish (all copyrights disclaimed). COPYRIGHT
Copyright (C) 2002 Richard Clamp. All Rights Reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. SEE ALSO
File::Find::Object::Rule perl v5.14.2 2012-05-05 FINDORULE(1p)