RE: request: SOAP::Lite parameter passing question.
Maybe try something like this (you need to substitute parameters). I
don't believe you will get all the SOAP headers (SOAP:Lite parses all
that for you):
If you posted the WSDL I could tell you what this code should be
exactly.
print ul;
foreach $r(@{$result-{'resultElements'}})
{
$rescount++;
if ($r-{'URL'} eq $cgi-param('url'))
{
print lib[$rescount]/b/li;
print lia href= . $r-{'URL'} . .
$r-{'title'} ./a;
print
;
print $r-{'snippet'}.(.$r-{'cachedSize'}.)./li;
}
}
print /ul;
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of
Michael 'topdog' Thompson
Sent: Thursday, April 15, 2004 6:38 PM
To: [EMAIL PROTECTED]
Subject: request: SOAP::Lite parameter passing question.
--
hi,
i'm working with the soap::lite. i've got to interface with a c# web
service that requires one parameter, but i'm getting nothing back. my
code looks like the following:
use SOAP::Lite;
my $soapResponse = SOAP::Lite
- service('http://1.2.0.3/WebServices/Service1.asmx?wsdl');
my $testData = some text;
my $result = $soapResponse-getTransaction('$testData');
#
# its at this point that no data was passed to the .net site web service
#
print result --,$result,--\n; # should return some text back.
# nothing is returned.
regards,
michael thompson
i have slipped the surly bonds of earth, and danced the skies on
laughter-silvered wings; --john gillespie magee jr.
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: Win32::GUI Question
File::Find performs that task quickly and efficiently. You can copy the example from the POD and you are ready to go. -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Dirk Bremer (NISC) Sent: Friday, March 12, 2004 8:55 AM To: [EMAIL PROTECTED] Subject: Win32::GUI Question Someone recently posted a code example using Win32::GUI to browse for a folder, ala: $Dir = GUI::BrowseForFolder(-title = Win32::GUI::BrowseForFolder test); Is there a similar method to browse a folder for the files contained within and to allow the selection of multiple files, returning the selected filename(s)? Dirk Bremer - Systems Programmer II - ESS/AMS - NISC St. Peters USA Central Time Zone 636-922-9158 ext. 8652 fax 636-447-4471 [EMAIL PROTECTED] www.nisc.cc ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: Perl and Crystal Reports
Title: RE: Perl and Crystal Reports CR9 has Java and .NET (ASP as well) interfaces, but the Java thing is brand new. The only way I think you could get Perl in the mix is to publish the Crystal Report as a web service and then consume it with a SOAP Proxy in a Perl script. Grant Babb L-EET Web Services http://www.l-eet.com/ -Original Message- From: steve silvers [mailto:[EMAIL PROTECTED]] Sent: Monday, January 26, 2004 8:00 AM To: [EMAIL PROTECTED] Subject: Perl and Crystal Reports Quick question. Does Perl have any modules for Crystal Reports? Basically I have a form that I enter the report parameters into (Start Date, End Date, Report Name, etc...) and I want my script to pass those to the Crystal Report, but not display the report, but have it created in say PDF or HTML format and placed in a directory. Has anyone done this or have a suggestion as how to do this. Thanks in advance Steve _ Get a FREE online virus check for your PC here, from McAfee. http://clinic.mcafee.com/clinic/ibuy/campaign.asp?cid=3963 ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: Search engine results
Title: RE: Search engine results
You could modify the code from this article I wrote
... the Google Web Service offers a lot of flexibility as far as this problem goes.
http://www.l-eet.com/web-development/includes/articles/?id=Web-Services-In-Perl,-Part-1
grant babb
L-EET Web Services
http://www.l-eet.com/
-Original Message-
From: John Ellingsworth [mailto:[EMAIL PROTECTED]]
Sent: Monday, November 03, 2003 7:24 AM
To: Michael D. Smith; Perl-Win32-Users-listserv.ActiveState.com
Subject: RE: Search engine results
You can start with google and read the book Google Hacks from O'Reilly,
which has many sample scripts. Here is some code for parsing the results of
an query run against google. The google html results are saved as a file
(this is the non-automated part that could be improved); then run this
script against it and get your results in a csv file:
#!/usr/bin/perl
# google2csv.pl # Google Web Search Results exported to CSV suitable
# for import into Excel
# Usage: perl google2csv.pl results.html results.csv
print qq{title,url,size,domain suffix\n};
my($results) = (join '', ) =~ m!div(.*?)/div!mis;
while ( $results =~ m!p.+?a
href="" {
my($url,$title, $size) = ($1||'',$2||'',$3||'');
my($suffix) = $url =~ m!\.(\w+)/!;
$title =~ s!!!g; # double escape marks
$title =~ s!.+?!!g; # drop all HTML tags
print qq{$title,$url,$size,$suffix\n};
}
Example:
google query:
http://www.google.com/search?num=100=en=ISO-8859-1=d=u
sq=Philadelphiasa=Ntab=nw
(It's good to add num=100 to get more results per page.
$ perl google2csv.pl results.html results.csv
Results:
title,url,size,domain suffix
Philly.com - The Region's Home Page,http://www.philly.com/,,com
The Philadelphia Inquirer
Online,http://www.philly.com/mld/inquirer/,68k,com
PHILA.GOV | Welcome to the City of
Philadelphia,http://www.phila.gov/,34k,gov
Philadelphia Museum of Art: Home
Page,http://www.philamuseum.org/,25k,org
Philadelphia Museum of Art ~Craft
Show~,http://www.philamuseum.org/pmacraft/,5k,org
Thanks,
John Ellingsworth
http://mail.med.upenn.edu/~jellings/
AIM: vc2000support
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED]]On Behalf Of
Michael D. Smith
Sent: Monday, November 03, 2003 7:03 AM
To: Perl-Win32-Users-listserv.ActiveState.com
Subject: Search engine results
I want to use perl to get and parse search engine results (several if
possible) based on a variable keyword.
This can't be the first time anyone has wanted to do that. Question is,
does anyone know of any open source code, modules, whatever, just so I
don't have to recode the wheel? Mostly because I'm not sure I can.
I've been looking at ask.com. Some of it is obvious (the url and the get
method). Some of it is obvious but I don't know why (two hidden values of
zero that never change -- if it never changes why not make it a constant in
the program?) and some of it, I have no idea where it's coming from, or
what it's for (Apparently some x and y coordinates, but where from and
why is lost on me, as is how, and if, they affect the results).
Ahh Micro$oft servers :)
Any thoughts appreciated.
ms
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
___
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: command prompt problems.
Title: RE: command prompt problems. http://sourceforge.net/projects/bb4win/ Viva la SourceForge, dawg. HTH, grant stevens L-EET Web Services http://www.l-eet.com/ -Original Message- From: Michael D. Smith [mailto:[EMAIL PROTECTED]] Sent: Thursday, October 30, 2003 3:20 PM To: [EMAIL PROTECTED] Subject: Re: command prompt problems. Try the one on my Tripod site. I don't get it. It looks exactly like the one that came with win98 except it's 3 times bigger. Almost exactly anyway, the right click menu is not as extensive but the functions can still be accessed from the buttons at the top. So, why is it better (bigger) than the win98 original? ms t 08:39 AM 10/30/03, you wrote: Beckett Richard-qswi266 wrote: Guys, I've installed perl at home on my W98 system. There are many reasons why I want to stick with w98, so changing OS is not an option. The problem is, that I use the command prompt a lot when writing/debugging scripts, but the w98 prompt is really crap. It won't let you specify the size of the window and buffer, etc. Actually it will, but you need a program to do it. I have one that uses Cygwin, but it's not complete yet. A native version would be better. So, has anyone found a way around this, or found a suitable alternative? I tried copying cmd.exe from a w2k system onto it, but it wouldn't run. Try the one on my Tripod site. -- ,-/- __ _ _ $Bill Luebkert Mailto:[EMAIL PROTECTED] (_/ / ) // // DBE Collectibles Mailto:[EMAIL PROTECTED] / ) /-- o // // Castle of Medieval Myth Magic http://www.todbe.com/ -/-' /___/__/_/_ http://dbecoll.tripod.com/ (My Perl/Lakers stuff) ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs ___ Perl-Win32-Users mailing list [EMAIL PROTECTED] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
