Tek-Tips is the largest IT community on the Internet today!
Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!
-
Congratulations derfloh on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!
-
equivavent of getstore function with LWP::Useragent
Hi, I use the function getstore($url,$file) of LWP::Simple. is somebody know the equivalent function with LWP::UserAgent and HTTP::Request (because I need to identify myself and I can't do it with LWP::Simple) ? thanks, -
LWP::simple and user agent
Hi, I'm using LWP::Simple Is there a way to change the USER AGENT ? (what is the default user agent ?) thanks; -
login/password with LWP::Simple
usually I use : my $link = "http://www.pipo.com/pipo.xml"; my $document = get($link); my $xp = XML::XPath->new(xml => $document); but with the authentification : $ua = LWP::UserAgent->new; my $link = "http://www.pipo.com/pipo.xml"; $req = HTTP::Request->new(GET => $link)... -
login/password with LWP::Simple
Hi, It's a XML file that I want to Parse. I try to use use LWP::UserAgent; $ua = LWP::UserAgent->new; $req = HTTP::Request->new(GET => $link); $req->authorization_basic('login', 'password'); $document = $ua->request($req)->as_string; but ->as_string returns a text version of the document... -
login/password with LWP::Simple
Hi, I need to parse a XML file which is in a protected folder. Is it possible to include my login/password in LWP::Simple ??? Thanks, -
Perl XML parser
Hi, I'm parsing a XML file with XML::XPath. with a command like : $data = $row->find('/Names/Name')->string_value; But how can I extract this data - 559 - in <Category ID="559" : <CategoriesList> <Category ID="559" UNCATID="45111601" Searchable="0" > <ParentCategory ID="558">... -
problem installing a module
Hi, I'm trying to install a unicode module called unicode::map8 but I have a warning : WARNING : PREREQUISITE unicode::map8 0 not found What does this mean ? and how can i avoid this ? Thanks -
Russian characters in Perl
Hi, I would like to convert and display a text with russian characters (Cyrillic) in ISO latin characters. How can I do this in Perl ?? Thanks. -
html parser
Thanks a lot for your help, I just begin with perl and i have some problems with the HTML::TokeParser. I woul like to extract all ALT and SCR informations of the page. I tried the following code : use HTML::TokeParser; $p = HTML::TokeParser->new("page.html") || die "Can't open"; while... -
html parser
Hi, I would like to extract informations from a html page. For all the IMG tags of the page => alt and scr informations. How can i do this ??? Thanks, -
PERL: download and save an image
Thanks a lot, it's perfect. Best Regards Defer -
PERL: download and save an image
Hi, How could I download images (with the url) and save the files on my harddrive. Is it possible with LWP and filehandles ??? Best Regards Defer -
PERL : save JPEG images
Hi, I have a database (mysql) table of this type : ------------------------------------------------ code ## product ## URL_of_the_product_image ------------------------------------------------ ex : 124544 ## pen ## www.asiteweb.com/popo.JPEG... -
PERL XML to SQL : Problem with Special characters
Hi, Finally the problem is upstream. Before the process XML -> MySQL. I use LWP::Simple to retrieve the XML file and store the XML String in a variable $document and then extract the data from $document with XML::Xpath. The Problem is : the Special characters are missing in $document !!! Any... -
PERL XML to SQL : Problem with Special characters
stevexff, Thanks for your help, but the columns up is already set as NVARCHAR. In Fact, the problem is probably not with the database cause if I enter the string manually (Paste) in the field, there is no trouble with the characters. It seems that I loose my special characters during the... -
PERL XML to SQL : Problem with Special characters
Hi, I'm extracting data from XML to a MySQL database with XML::Xpath (PERL). It works fine now (thanks again for your help) but I'm loosing special characters in the process. French character 'é' becomes a 'é' in the associated database field. Ex: XML -> 'Mon trésor' ===> MySQL -> 'Mon... -
PERL XML::XPath
Thanks a lot for your help Chris , the second solution works fine. Best Regards Defer -
PERL XML::XPath
Thank you very much for your help. When I use pipes : assuming ('code' and 'title' are in the first node and 'url' in the second one) ...... my $sth = $dbh->prepare(qq{INSERT INTO books VALUES (?, ?, ?)}); foreach my $row ($xp->findnodes('/Ensemble/item/Attributes | Ensemble/item/SubInfo '))... -
PERL XML::XPath
Hi, I'm using a script to extract data from a node of an XML document with (PERL) XML::XPath with a loop : ...... foreach my $row ($xp->findnodes('/Ensemble/item/Attributes')) { # extract from the XML my $code = $row->find('code')->string_value; my $title =...
