Beefy Boxes and Bandwidth Generously Provided by pair Networks
go ahead... be a heretic
 
PerlMonks  

Re^7: saveResources_future and tab in WWW::Mechanize::Chrome

by 1nelly1 (Acolyte)
on May 13, 2020 at 20:05 UTC ( #11116765=note: print w/replies, xml ) Need Help??


in reply to Re^6: saveResources_future and tab in WWW::Mechanize::Chrome
in thread saveResources_future and tab in WWW::Mechanize::Chrome

Sorry to bother you again. I installed the update. Now in %names only one uri and no printing at all in sub saveResources_future.
Best regards
1nelly1

  • Comment on Re^7: saveResources_future and tab in WWW::Mechanize::Chrome

Replies are listed 'Best First'.
Re^8: saveResources_future and tab in WWW::Mechanize::Chrome
by Corion (Pope) on May 13, 2020 at 20:22 UTC

    saveResources_future now follows its documentation and returns a hashref where it previously returned a hash.

    Also, the printing was an error and is now eliminated.

    If you can show a bit code then maybe I can see how to improve your code or what to change to make it behave as you want?

      As I mentioned earlier I am just testing WWW::Mechanize::Chrome in order to use it instead of WWW::Mechanize::Firefox. In WWW::Mechanize::Firefox you implemented the save_url save_content methods and now I experiment with your saveResources_future method in WWW::Mechanize::Chrome. I do this by just using exactly the code of the documentation:

      my $file_map = $mech->saveResources_future( target_file => 'this_page.html', target_dir => 'this_page_files/', wanted => sub { $_[0]->{url} =~ m!^https?:!i }, )->get();

      I noticed that you changed the reference of $file_map now refering to a hash containing uri as key and file as value. In my last posting I wanted to inform you that there is only one value in that hash which is the url of the current fetched webpage. I also wanted to inform you that there is no saving of files at all.
      This seems to be like that because the printing in this code of saveResources_future is never executed:
      $names{ $resource->{url} } ||= File::Spec->catfile( $target_dir, $name +s{ $resource->{url} }); my $target = $names{ $resource->{url} } or die "Don't have a filename for URL '$resource->{url}' ?!"; $s->log( 'debug', "Saving '$resource->{url}' to '$target'" ); open my $fh, '>', $target or croak "Couldn't save url '$resource->{url}' to $target: $!"; binmode $fh; print $fh $resource->{content}; CORE::close( $fh );

      So for me as is the method does not work as intended. Kindly recheck by yourself.
      Thank you and best regards
      1nelly1

        Not having example code makes it much harder to find out what parts of the code don't work in your opinion.

        I've added a new test case and will release it soonish, but I don't know if it addresses your case.

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://11116765]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others rifling through the Monastery: (6)
As of 2020-11-27 15:15 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found

    Notices?