Re: How to cut up a long line

On 1/11/25 2:20 AM, ToddAndMargo via perl6-users wrote:
> On 1/11/25 2:17 AM, ToddAndMargo wrote:
>> On 1/10/25 9:35 PM, ToddAndMargo wrote:
>>>
>>>>
>>>>> On Jan 10, 2025, at 17:50, ToddAndMargo via perl6-users <perl6- 
>>>>> [email protected]> wrote:
>>>>>
>>>>> Hi All,
>>>>>
>>>>> I am scratching my head trying to figure out how to cut
>>>>> up this long line;
>>>>>
>>>>>
>>>>> download='betterbird-128.6.0esr-bb20.de.linux-x86_64.tar.bz2'><div 
>>>>> class="img bz2"></div><div class="name"><div class="file fs-1-2 
>>>>> bold">betterbird-128.6.0esr-bb20.de.linux-x86_64.tar.bz2</div><div 
>>>>> class="data upper size fs-0-7"><span class="bold">Size:</span> 
>>>>> 80.26<span class="fs-0-8 bold">MB</span></div><div class="data 
>>>>> upper modified fs-0-7"><span class="bold">Last modified:</span> 
>>>>> Tue. January 7th, 2025 - 10:54pm</div></div></a></div><div 
>>>>> class="block"><a href="LinuxArchive/betterbird-128.6.0esr-bb20.en- 
>>>>> US.linux- x86_64.tar.bz2" class="bz2" 
>>>>> download='betterbird-128.6.0esr-bb20.en- US.linux- 
>>>>> x86_64.tar.bz2'><div class="img bz2"></div><div class="name"><div 
>>>>> class="file fs-1-2 bold">betterbird-128.6.0esr- bb20.en-US.linux- 
>>>>> x86_64.tar.bz2</div><div class="data upper size fs-0-7"><span 
>>>>> class="bold">Size:</span> 80.04<span class="fs-0-8 bold">MB</ 
>>>>> span></ div><div class="data upper modified fs-0-7"><span 
>>>>> class="bold">Last modified:</span> Tue. January 7th, 2025 - 
>>>>> 10:42pm</ div></div></a></ div><div class="block"><a 
>>>>> href="LinuxArchive/ betterbird-128.6.0esr- bb20.es-AR.linux- 
>>>>> x86_64.tar.bz2" class="bz2" download='betterbird-128.6.0esr- 
>>>>> bb20.es-AR.linux- x86_64.tar.bz2'><div class="img bz2"></div><div 
>>>>> class="name"><div class="file fs-1-2 bold">betterbird-128.6.0esr- 
>>>>> bb20.es-AR.linux- x86_64.tar.bz2</div>
>>>>>
>>>>>
>>>>> What I want to come out of it is an array of stings starting
>>>>> at "download" and ending at ">" or "<"
>>>>>
>>>>> download='betterbird-128.6.0esr-bb20.de.linux-x86_64.tar.bz2'
>>>>> download='betterbird-128.6.0esr-bb20.en-US.linux-x86_64.tar.bz2'
>>>>> download='betterbird-128.6.0esr-bb20.es-AR.linux- 
>>>>> x86_64.tar.bz2'x86_64.tar.bz2
>>>>>
>>>>>
>>>>> Many thanks,
>>>>> -T
>>>
>>> On 1/10/25 8:59 PM, William Michels via perl6-users wrote:
>>>  > Hi Todd,
>>>  >
>>>  > ~$ raku -ne 'put $/.join("\n") if m:g/ <?before  download> .*? <? 
>>> before
>>>  > \> | \h+ > /;'  todd_test.txt
>>>  > download='betterbird-128.6.0esr-bb20.de.linux-x86_64.tar.bz2'
>>>  > download='betterbird-128.6.0esr-bb20.en-US.linux-x86_64.tar.bz2'
>>>  > download='betterbird-128.6.0esr-bb20.es-AR.linux-x86_64.tar.bz2'
>>>  >
>>>  > See: https://docs.raku.org/syntax/%24%2F <https://docs.raku.org/ 
>>> syntax/
>>>  > %24%2F>
>>>  > See: https://docs.raku.org/language/regexes#Lookahead_assertions
>>>  > <https://docs.raku.org/language/regexes#Lookahead_assertions>
>>>  >
>>>  > OR:
>>>  >
>>>  > ~$ raku -ne 'put $/.join("\n") if m:g/ <( download  .*? )> [ \> |
>>>  > \h+ ] /;'  todd_test.txt
>>>  > download='betterbird-128.6.0esr-bb20.de.linux-x86_64.tar.bz2'
>>>  > download='betterbird-128.6.0esr-bb20.en-US.linux-x86_64.tar.bz2'
>>>  > download='betterbird-128.6.0esr-bb20.es-AR.linux-x86_64.tar.bz2'
>>>  >
>>>  > See: https://docs.raku.org/language/ 
>>> regexes#Capture_markers:_%3C(_)%3E
>>>  > <https://docs.raku.org/language/regexes#Capture_markers:_%3C(_)%3E>
>>>  >
>>>  > Let me know if this is part of a larger script, how you're 
>>> obtaining the
>>>  > input line(s), etc., if you need more guidance.
>>>  >
>>>  > HTH,
>>>  >
>>>  > Bill.
>>>  >
>>>
>>> Hi Bill,
>>>
>>> Thank you!
>>>
>>> I will not have the time to do any programming till maybe
>>> Sunday, so I will not have a chance till then to test
>>> this out.
>>>
>>> Yes, this is a simplification of a much larger program.
>>> The line in question is
>>>
>>> line 379
>>> view-source:https://www.betterbird.eu/downloads/index.php
>>>
>>> The YUGE run on line.  (I hate when they do that.)
>>>
>>> I am having a problem figuring out how to get your example
>>> into an array of strings.
>>>
>>> The long line will reside in
>>>     my Str $AltClickHere;
>>>
>>> And the resulting array will reside in
>>>     my @AltArray
>>>
>>> Would you mind showing me how to do that whilst I wait
>>> for some free time?
>>>
>>> Many thanks,
>>> -T
>>
>>     my Str $AltClickHere  = "";
>>     my @AltArray;
>>
>> @AltArray = $AltClickHere ~~ m:g/ <?before ^ | download > .*? <?before 
>> \> | \h+ > /;  .put for @AltArray;
>>
>> Type check failed for an element of @AltArray; expected Str but got 
>> Match (Match.new(:orig("dow...)
> 
> 
> I tool out the "Str" from my array declaration .    Now I
> am getting
> 
> 
> Too many positionals passed; expected 1 argument but got 2
> 


Got it!

I took out the .put

  @AltArray = $AltClickHere ~~ m:g/ <?before ^ | download > .*? <?before 
\> | \h+ > /;  # .put for @AltArray;

Thank you!!!!
-T