On 3/5/26 09:20, Timo Paulssen via perl6-users wrote:
hen I run your code, with or without the `sleep` commands, it seems to
work. I opened the source code of the page using my browser because with
just `curl` it gave me a different page. I assume this is what you
created CurlImpersonate
I am impersonating Firefox. Too many curl reads and you get blocked
for an hour or so (never times it). Makes troubleshooting impossible.
https://github.com/lexiforest/curl-impersonate/releases
His scripts are for chrome, but I alter mine for Firefox
because it seems to work better.
for, to pretend to the website that you're a
"real browser" and not a script.
rakudo -e ' my $NewRev = "icedrive_download.html".IO.slurp;
# <meta name="description" content="Download Icedrive 3.56 -
Back up and access your files from wherever w
ith this cloud solution, capable of acting as if it were a physical
drive on your computer">
# print "1.2\n";
$NewRev ~~ s/ .*? $( Q[Download Icedrive ] ) //;
# print "1.5\n";
$NewRev ~~ s/ $( Q[ ] ) .* //;
# print "2\n";
if $NewRev.chars > 40 { $NewRev = 0; }
# print "3\n";
# https://cdn.icedrive.net/static/apps/win/IcedriveSetup-
v3.56.exe --output
# print "4\n";
my $ClickHere = Q[https://cdn.icedrive.net/static/apps/win/
IcedriveSetup-v] ~ $NewRev ~ ".exe";
# print "5\n";
say "SubName: \n" ~
" NewRev = <$NewRev>\n" ~
" ClickHere = <$ClickHere>\n\n"; '
SubName:
NewRev = <3.56>
ClickHere = <https://cdn.icedrive.net/static/apps/win/IcedriveSetup-
v3.56.exe>
I'm sorry, I'm not sure what exactly is going wrong when you try it that
causes the difference 🙁
Hope that helps anyway,
- Timo
That is why I think it is so weird. I comment out the
print statements and it stops working. Put them back or
substitute sleep statements and it works.
I just noticed a new Rakudo downloaded on my GetUpdates program.
Maybe that will fix it.
Thank you for the help.
