On 08/10/2018 08:59 PM, ToddAndMargo wrote:
On Fri, Aug 10, 2018 at 8:16 PM, ToddAndMargo <toddandma...@zoho.com>
wrote:
Hi All,
I was thinking of doing a
$ p6 'my $x="a\nb\nc\nd\n"; say "$x\n"; $x ~~ s/ .*?c /c/; say "$x";'
a
b
c
d
c
d
Except the real deal will be across 1460 lines. Am I pushing the
limits?
There are other ways of doing what I want.
Many thanks,
-T
On 08/10/2018 08:29 PM, yary wrote:
> 1460 lines, at an average of say, oh, 70 characters per line, that's
> oh 100k or so? Sounds like a piece of cake... try it and see
> -y
>
>
Hi Yary,
I will.
This is what I am after:
<div class="form-group version_row">
<label for="" class="col-lg-4
control-label">Version:<span class="require">*</span></label>
<div class="col-lg-8">
<select name="version" class="form-control">
<option value="9.2.0.9297"
>9.2.0.9297</option><option value="8.3.6.35572" >8.3.6.35572</option>
</select>
</div>
</div>
$WebPage ~~ s/ . * '<div class="form-group version_row">'//;
$WebPage ~~ s/ '</div>' .* //;
Then
( $NewRev = $Webpage ) ~~ s/ .*? '<option value="'//;
$NewRev ~~ s/ '"' .* //;
I may have to fuss with the escapes.
I do so adore Perl!
:-)
-T
I have done this with two web pages already. Perl 6
eat its lunch!
--
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Computers are like air conditioners.
They malfunction when you open windows
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
