Here is the short code:

https://gist.github.com/adipasquale/2217595



On Sat, Mar 19, 2022 at 8:10 PM Adam Hopkins <violapirateju...@gmail.com>
wrote:

> Did you download Facebook.html and already have it sitting on your
> computer?
>
> Can you upload that to a gist and share it here?
>
> On Sat, Mar 19, 2022 at 8:48 PM William Torrez Corea <
> willitc9...@gmail.com> wrote:
>
>> I have a short code:
>>
>> #!/usr/bin/perl;
>> @ARGV = ("Facebook.html");
>> while(<>){
>> while(/(http[a-z\-\.0-9:\/]*\w*)_a.jpg/g){
>> print "wget $1_n.jpg\n";
>> }
>> }
>>
>> But the result expected is null. I don't know why.
>>
>> On Sat, Mar 19, 2022 at 7:21 AM Jim Gibson <jimsgib...@gmail.com> wrote:
>>
>>> Check out the LWP library of modules on CPAN:
>>>
>>> <https://metacpan.org/pod/LWP>
>>>
>>> > On Mar 19, 2022, at 6:07 AM, William Torrez Corea <
>>> willitc9...@gmail.com> wrote:
>>> >
>>> > I have an idea from the program but I don't know where to start.
>>> >
>>>
>>> Jim Gibson
>>>
>>>
>>>
>>>
>>
>> --
>>
>> With kindest regards, William.
>>
>> ⢀⣴⠾⠻⢶⣦⠀
>> ⣾⠁⢠⠒⠀⣿⡁ Debian - The universal operating system
>> ⢿⡄⠘⠷⠚⠋⠀ https://www.debian.org
>> ⠈⠳⣄⠀⠀⠀⠀
>>
>>

-- 

With kindest regards, William.

⢀⣴⠾⠻⢶⣦⠀
⣾⠁⢠⠒⠀⣿⡁ Debian - The universal operating system
⢿⡄⠘⠷⠚⠋⠀ https://www.debian.org
⠈⠳⣄⠀⠀⠀⠀

Reply via email to