On Sat, 19 Feb 2005 18:42:36 +1100, [EMAIL PROTECTED] (Damian Conway) wrote:
> the Awesome Power of Junctions:
As I tried to express elsehwere, this what I'm looking for.
Instinctively, and for a long time since I first came across Q::S, I thought
that the "killer app" of Junctions is there so
Rod Adams asked:
> This sound reasonable enough?
Frankly, no. ;-)
Sorry, but your latest proposal sounds complex, multiply special-cased, and
way too much of an imposition on the programmer (which is specifically what
junctions are supposed to avoid).
I'm going to continue to strongly recommend
Nigel Sandever wrote:
On Sat, 19 Feb 2005 18:42:36 +1100, [EMAIL PROTECTED] (Damian Conway) wrote:
The Awesome Power of Junctions:
As I tried to express elsehwere, this what I'm looking for.
Instinctively, and for a long time since I first came across Q::S, I thought
that the "killer app" o
Damian Conway wrote:
Rod Adams asked:
> This sound reasonable enough?
Frankly, no. ;-)
Sorry, but your latest proposal sounds complex, multiply
special-cased, and way too much of an imposition on the programmer
(which is specifically what junctions are supposed to avoid).
Funny. I thought it was
On Sat, Feb 19, 2005 at 01:43:57PM -0800, Ashley Winters wrote:
> Instead of primary sigils, what about secondary sigils on an array to
> mark it as an unordered set?
>
> @|foo = any
> @&foo = all
> @^foo = one # can arrays be curried arguments? hmm
> @!foo = none
>
> After all, why should scal
On Sun, 20 Feb 2005 03:17:19 -0600, [EMAIL PROTECTED] (Rod Adams) wrote:
> --020209010404060902000407
> Content-Type: text/plain; charset=windows-1252; format=flowed
> Content-Transfer-Encoding: 7bit
>
> Nigel Sandever wrote:
>
> >On Sat, 19 Feb 2005 18:42:36 +1100, [EMAIL PROTECTED]
Rod Adams <[EMAIL PROTECTED]> writes:
> $re1 = /^ <-[x]>* x <-[x]>* $/; # match a string with exactly one
> 'x' in it.
> $re2 = /^ <-[y]>* y <-[y]>* $/; # ditto 'y'
> $re3 = /^ <-[z]>* z <-[z]>* $/; # ditto 'z'
> $re7 = none($re1, $re2, $re3); # matches if there are 0 or 2+ of
Eirik Berg Hanssen wrote:
Rod Adams <[EMAIL PROTECTED]> writes:
$re1 = /^ <-[x]>* x <-[x]>* $/; # match a string with exactly one
'x' in it.
$re2 = /^ <-[y]>* y <-[y]>* $/; # ditto 'y'
$re3 = /^ <-[z]>* z <-[z]>* $/; # ditto 'z'
$re7 = none($re1, $re2, $re3); # matches if ther
On Sun, Feb 20, 2005 at 07:41:16PM +1100, Damian Conway wrote:
Given this:
> my $x = set(1..3);
> my $y = set(1,3,5,7,9);
> my $n = 2;
>
> $x | $y # set(1,2,3,5,7,9)
> $x & $y # set(1,3)
> $x - $y # set(2)
> !$x
Rod Adams <[EMAIL PROTECTED]> writes:
> Eirik Berg Hanssen wrote:
>
>>Rod Adams <[EMAIL PROTECTED]> writes:
>>
>>
>>
>>>$re1 = /^ <-[x]>* x <-[x]>* $/; # match a string with exactly one
>>>'x' in it.
>>>$re2 = /^ <-[y]>* y <-[y]>* $/; # ditto 'y'
>>>$re3 = /^ <-[z]>* z <-[z]>* $/; #
> "NC" == Nicholas Clark <[EMAIL PROTECTED]> writes:
NC> On Sun, Feb 20, 2005 at 07:41:16PM +1100, Damian Conway wrote:
NC> Given this:
>> my $x = set(1..3);
>> my $y = set(1,3,5,7,9);
>> my $n = 2;
>>
>> $x | $y # set(1,2,3,5,7,9)
>> $x & $y # set(1,3)
>> $x - $y
Nicholas Clark wrote:
On Sun, Feb 20, 2005 at 07:41:16PM +1100, Damian Conway wrote:
Given this:
my $x = set(1..3);
my $y = set(1,3,5,7,9);
my $n = 2;
$x | $y # set(1,2,3,5,7,9)
$x & $y # set(1,3)
$x - $y # set(2)
!$x
Eirik Berg Hanssen <[EMAIL PROTECTED]> writes:
> Rod Adams <[EMAIL PROTECTED]> writes:
>
>> Eirik Berg Hanssen wrote:
>>
>>>Rod Adams <[EMAIL PROTECTED]> writes:
$re1 = /^ <-[x]>* x <-[x]>* $/; # match a string with exactly one
'x' in it.
$re2 = /^ <-[y]>* y <-[y]>* $/; # dit
On Sun, Feb 20, 2005 at 10:46:15PM +0100, Eirik Berg Hanssen wrote:
> Eirik Berg Hanssen <[EMAIL PROTECTED]> writes:
> > Rod Adams <[EMAIL PROTECTED]> writes:
> >>$re1 = /^ <-[x]>* x <-[x]>* $/; # match a string with exactly one 'x'
> >>$re2 = /^ <-[y]>* y <-[y]>* $/; # ditto 'y'
> >>$
Damian~
On Mon, 21 Feb 2005 08:29:40 +1100, Damian Conway <[EMAIL PROTECTED]> wrote:
> Nicholas Clark wrote:
>
> > On Sun, Feb 20, 2005 at 07:41:16PM +1100, Damian Conway wrote:
> >
> > Given this:
> >
> >
> >> my $x = set(1..3);
> >> my $y = set(1,3,5,7,9);
> >> my $n =
15 matches
Mail list logo
