Maybe this will work
use HTTP::UserAgent;
my $ua = HTTP::UserAgent.new;
$ua.timeout = 10;
my $response = $ua.get("https://ftp.mozilla.org/pub/firefox/releases/";);
if $response.is-success {
say $response.content ~~ m:g{\> (\d+ \. .+?) \/};
}
..
Please post also your question to StackOverflow, you might have better
answers there. This one works directly on the HTML source, but you will
just need to take out \> and \/ to use other. Also it's a global one, if
you work by lines it might be simpler.
El lun., 14 may. 2018 a las 11:21, ToddAndMargo (<toddandma...@zoho.com>)
escribió:
> >> El lun., 14 may. 2018 a las 7:08, ToddAndMargo (<toddandma...@zoho.com
> >> <mailto:toddandma...@zoho.com>>) escribió:
> >>
> >> On 05/13/2018 09:41 PM, ToddAndMargo wrote:
> >> > Hi All,
> >> >
> >> > I can't not remember what I did in Perl 5 here and
> >> > am not having a good time converting it to Perl 6.
> >> >
> >> > $ perl -e 'my $A="44.rc0"; if ($A ~~ /(^[0-9,.,a,b,rc]+$)/ )
> {print
> >> > "$1\n";} else {print "\$A = <$A>\n"}'
> >> >
> >> > 44.rc0
> >> >
> >> > The actual code is:
> >> > if ( $Line2 ~~ /(^[0-9,.]+$)/ ) { push ( @WebVersions, $Line2 );
> }
> >> >
> >> > The actual data looks like:
> >> >
> >> > $Line2 = 6.0.1
> >> > $Line2 = 6.0.2
> >> > $Line2 = 6.0
> >> > $Line2 = 6.0b1
> >> > $Line2 = 6.0b2
> >> > $Line2 = 6.0b3
> >> > $Line2 = 6.0b4
> >> > $Line2 = 6.0b5
> >> > $Line2 = 60.0
> >> > $Line2 = 60.0b10
> >> > $Line2 = 60.0b11
> >> > $Line2 = 60.0b12
> >> >
> >> > I am trying to exclude things that look like:
> >> >
> >> > $Line2 = bonecho
> >> > $Line2 = custom-updates
> >> > $Line2 = deerpark
> >> > $Line2 = devpreview
> >> > $Line2 = granparadiso
> >> > $Line2 = latest-beta
> >> > $Line2 = latest-esr
> >> >
> >> >
> >> > Many thanks,
> >> > -T
> >>
> >> perl6.org <http://perl6.org> is down by the way.
> >>
> >> Is this right?
> >>
> >> perl6 -e 'my $A="44.rc20"; if $A ~~ m/( \d**1..4 "." ( "a" | "b" |
> "rc"
> >> ) .*$ ) / {say "$0";} else {say "no match";}'
> >>
> >> 44.rc20
> >>
>
> On 05/13/2018 11:41 PM, JJ Merelo wrote:
> > You want to exclude lines starting with an alphabetic character, or
> > which are composed exclusively by alphabetic characters?
> >
>
>
> I am trying to separate revision numbers (60.0.1, 20.0b5) from
> extraneous directories (latest-esr, 20.0.1-funnelcake22)
>
> You can see a full list before I have at it here:
>
> https://ftp.mozilla.org/pub/firefox/releases/
>
> I just want current releases
>
--
JJ
