Re: Need help understand "class"

2020-12-08 Thread Curt Tilmes
On Tue, Dec 8, 2020 at 7:05 PM ToddAndMargo via perl6-users wrote: > I guess what I am missing is how > > int cupsEnumDests(unsigned flags, int msec, int *cancel, cups_ptype_t > type, cups_ptype_t mask, cups_dest_cb_t cb, void *user_data); > > matches up with > > class CupsDest is repr('CStruct'

Re: Need help understand "class"

2020-12-08 Thread ToddAndMargo via perl6-users
Hi All, In the following piece of code: use NativeCall; class CupsDest is repr('CStruct') { has Str $.name; has Str $.instance; has int32 $.is-default; has Pointer $.options; } sub cupsGetDests(Pointer is rw --> int32) is native('cups', v2) {} Would some kind soul pl

Re: Need help understand "class"

2020-12-08 Thread Andy Bach
> Would some kind soul please explain to me what is going on line by line with > the "class" statement. > cupsGetDests definition can be found at: https://www.cups.org/doc/cupspm.html The point of the class is to create a "template" in raku matching the C structure of the cups stuct. That

Re: Need help with a regex

2019-05-07 Thread ToddAndMargo via perl6-users
> On Mon, May 06, 2019 at 07:12:39PM -0700, Tony Ewell via perl6-users wrote: >> Hi All, >> >> What am I doing wrong here? >> >> $ p6 'my $x="\$1.23"; $x~~s/("\$") (.*?)/$1USD/; say $x;' >> USD1.23 >> >> I am expecting to see `1.23USD` >> >> Many thanks, >> -T On 5/7/19 3:05 PM, Patrick R. Mich

Re: Need help with a regex

2019-05-07 Thread Patrick R. Michaud
The (.*?) pattern will match an empty string. Thus $0 gets the dollar sign, $1 is "", and "$" ~ "" (i.e., "$") gets replaced by "" ~ "USD" (i.e., "USD"). So the net result is to replace the single dollar sign by "USD", resulting in "USD1.23". You might want to remove the ? modifier from .*?

Re: Need help with a regex

2019-05-06 Thread ToddAndMargo via perl6-users
On Tue, 7 May 2019 at 13:10, ToddAndMargo via perl6-users mailto:perl6-us...@perl.org>> wrote: Hi All, What am I doing wrong here? $ p6 'my $x="\$1.23"; $x~~s/("\$") (.*?)/$1USD/; say $x;' USD1.23 I am expecting to see `1.23USD` Many thanks, -T On 5/6/19 8:28

Re: Need help with a regex

2019-05-06 Thread ToddAndMargo via perl6-users
On Tue, 7 May 2019 at 13:10, ToddAndMargo via perl6-users mailto:perl6-us...@perl.org>> wrote: Hi All, What am I doing wrong here? $ p6 'my $x="\$1.23"; $x~~s/("\$") (.*?)/$1USD/; say $x;' USD1.23 I am expecting to see `1.23USD` Many thanks, -T On 5/6/19 8:24

Re: Need help with a regex

2019-05-06 Thread Norman Gaywood
The .*? expression is not matching anything. I think you want to use .+ perl6 -e 'my $x="\$1.23"; $x~~s/("\$") (.*?)/$0:$1:USD/; say $x;' $::USD1.23 perl6 -e 'my $x="\$1.23"; $x~~s/ \$(.+) /$0USD/; say $x' 1.23USD On Tue, 7 May 2019 at 13:10, ToddAndMargo via perl6-users < perl6-us...@perl.org

Re: need --> help

2018-10-13 Thread ToddAndMargo via perl6-users
On 10/13/18 3:06 AM, Ralph Mellor wrote: That would work. I think it's more idiomatic to write the declaration as: my (Str $x, Int $y) = ... which saves repeating the `my`. -- raiph Thank you!

Re: need --> help

2018-10-13 Thread Ralph Mellor
That would work. I think it's more idiomatic to write the declaration as: my (Str $x, Int $y) = ... which saves repeating the `my`. -- raiph On Fri, Oct 12, 2018 at 11:47 PM ToddAndMargo via perl6-users < perl6-us...@perl.org> wrote: > On 10/12/18 3:27 PM, Curt Tilmes wrote: > > > > > > On F

Re: need --> help

2018-10-12 Thread Brandon Allbery
Actually, I was trying to think too much like tuples earlier… would a subsignature work here? …Turns out no. Seems unfortunate. pyanfar Z$ perl6 derp.p6 ===SORRY!=== Error while compiling /home/allbery/derp.p6 Unable to parse expression in typename; couldn't find final ')' (corresponding starter

Re: need --> help

2018-10-12 Thread ToddAndMargo via perl6-users
On Fri, Oct 12, 2018 at 11:23 PM ToddAndMargo via perl6-users mailto:perl6-us...@perl.org>> wrote: On 10/12/18 2:35 PM, Curt Tilmes wrote: > > > On Fri, Oct 12, 2018 at 5:08 PM ToddAndMargo via perl6-users > mailto:perl6-us...@perl.org>

Re: need --> help

2018-10-12 Thread ToddAndMargo via perl6-users
On 10/12/18 3:27 PM, Curt Tilmes wrote: On Fri, Oct 12, 2018 at 6:23 PM ToddAndMargo via perl6-users mailto:perl6-us...@perl.org>> wrote: Is there any way to say I am return two things: a string and an integer? You can only return one thing, but that one thing can be a List that has a

Re: need --> help

2018-10-12 Thread Ralph Mellor
I imagine P6 may one day be changed to do as you suggest. But for now I think something like this is the closest you'll get: subset Str_Int of List where Str, Int; sub foo (--> Str_Int) { return 'a', 42 } -- raiph On Fri, Oct 12, 2018 at 11:23 PM ToddAndMargo via perl6-users < perl6-us...@perl

Re: need --> help

2018-10-12 Thread Curt Tilmes
On Fri, Oct 12, 2018 at 6:23 PM ToddAndMargo via perl6-users < perl6-us...@perl.org> wrote: > Is there any way to say I am return two things: a string and an integer? > You can only return one thing, but that one thing can be a List that has a string and an integer in it.

Re: need --> help

2018-10-12 Thread ToddAndMargo via perl6-users
On 10/12/18 2:35 PM, Curt Tilmes wrote: On Fri, Oct 12, 2018 at 5:08 PM ToddAndMargo via perl6-users mailto:perl6-us...@perl.org>> wrote: >>     On 10/12/18 12:52 PM, Curt Tilmes wrote: >>      > You could make a subset for the List your're trying to return: >>      >

Re: need --> help

2018-10-12 Thread Curt Tilmes
On Fri, Oct 12, 2018 at 5:08 PM ToddAndMargo via perl6-users < perl6-us...@perl.org> wrote: > >> On 10/12/18 12:52 PM, Curt Tilmes wrote: > >> > You could make a subset for the List your're trying to return: > >> > > >> > subset liststrint of List where .[0] ~~ Str && .[1] ~~ In

Re: need --> help

2018-10-12 Thread ToddAndMargo via perl6-users
On Fri, Oct 12, 2018 at 3:14 PM ToddAndMargo via perl6-users mailto:perl6-us...@perl.org>> wrote: >> On Fri, Oct 12, 2018 at 3:32 PM ToddAndMargo via perl6-users >> mailto:perl6-us...@perl.org> >> wrote: >> >>

Re: need --> help

2018-10-12 Thread Brad Gilbert
That would be `List` sub RtnOrd( Str $Char --> List ){ $Char, ord($Char) } say RtnOrd "A" # (A 65) On Fri, Oct 12, 2018 at 3:14 PM ToddAndMargo via perl6-users < perl6-us...@perl.org> wrote: > >> On Fri, Oct 12, 2018 at 3:32 PM ToddAndMargo via perl6-users > >> mailto:perl6-us...@per

Re: need --> help

2018-10-12 Thread ToddAndMargo via perl6-users
On Fri, Oct 12, 2018 at 3:32 PM ToddAndMargo via perl6-users mailto:perl6-us...@perl.org>> wrote: But this does not? $ p6 'sub RtnOrd( Str $Char --> Str, Int ){return $Char, ord($Char)}; say RtnOrd "A";' ===SORRY!=== Error while compiling -e Malformed ret

Re: need --> help

2018-10-12 Thread ToddAndMargo via perl6-users
On Fri, Oct 12, 2018 at 3:32 PM ToddAndMargo via perl6-users mailto:perl6-us...@perl.org>> wrote: Hi All, Why does this work $ p6 'sub RtnOrd( Str $Char --> Int ){return ord($Char)}; say RtnOrd "A";' 65 But this does not? $ p6 'sub RtnOrd( Str $

Re: need --> help

2018-10-12 Thread Curt Tilmes
On Fri, Oct 12, 2018 at 3:32 PM ToddAndMargo via perl6-users < perl6-us...@perl.org> wrote: > > But this does not? > > $ p6 'sub RtnOrd( Str $Char --> Str, Int ){return $Char, > ord($Char)}; say RtnOrd "A";' > > ===SORRY!=== Error while compiling -e > Malformed return value (return

Re: need --> help

2018-10-12 Thread Brandon Allbery
Precedence. `--> (Str, Int)` might work better; right now it can't tell if you meant that, or intended the usual meaning for a comma which would separate parameters. On Fri, Oct 12, 2018 at 3:32 PM ToddAndMargo via perl6-users < perl6-us...@perl.org> wrote: > Hi All, > > Why does this work > >

Re: Need help with a variable inside a regex

2018-09-15 Thread ToddAndMargo
On Sat, Sep 15, 2018 at 4:09 AM ToddAndMargo > wrote: On 09/15/2018 12:42 AM, ToddAndMargo wrote: > Hi All, > > I am truing to use a variable inside a regex. > > This work (without the variable): >     $ p6 'my $x="6937-2.2.19882.exe

Re: Need help with a variable inside a regex

2018-09-15 Thread Brandon Allbery
To interpolate a variable as a regex instead of as a string literal, you need to wrap it in < >. On Sat, Sep 15, 2018 at 4:09 AM ToddAndMargo wrote: > On 09/15/2018 12:42 AM, ToddAndMargo wrote: > > Hi All, > > > > I am truing to use a variable inside a regex. > > > > This work (without the vari

Re: Need help with a variable inside a regex

2018-09-15 Thread ToddAndMargo
On 09/15/2018 12:42 AM, ToddAndMargo wrote: Hi All, I am truing to use a variable inside a regex. This work (without the variable):    $ p6 'my $x="6937-2.2.19882.exe"; if $x ~~ m/ .*? <<:\N**4>>  "-" (.*?) ".exe" / {say "yes";}'    yes I want to turn `<<:\N**4>>` into a variable:    $

Re: need help with zef error

2018-06-15 Thread ToddAndMargo
On 06/13/2018 11:40 PM, Todd Chester wrote: $ /opt/rakudo-pkg/bin/zef install IO::Socket::SSL ===> Searching for: IO::Socket::SSL ===> Searching for missing dependencies: OpenSSL ===> Fetching [FAIL]: IO::Socket::SSL:ver('0.0.1'):auth('github:sergot') from git://github.com/sergot/io-socket-ssl.g

Re: need help with zef error

2018-06-14 Thread ToddAndMargo
On 06/13/2018 11:49 PM, Patrick Spek via perl6-users wrote: Can I ask you which distro you're using and what your `perl6 -v` output is? This is my shop computer. I also did not run zef as root https://github.com/nxadm/rakudo-pkg/releases rakudo-pkg-Fedora27-2018.04.1-01.x86_64.rpm I see the

Re: need help with zef error

2018-06-13 Thread Patrick Spek via perl6-users
-BEGIN PGP SIGNED MESSAGE- Hash: SHA256 I just tried this myself: tyil@bast:~ » zef install IO::Socket::SSL ===> Searching for: IO::Socket::SSL ===> Updated cpan mirror: https://raw.githubusercontent.com/ugexe/Perl6-ecosystems/master/cpan.json ===> Updated p6c mirror: htt

Re: Need help converting from Perl 5

2018-05-14 Thread JJ Merelo
As far as I understand it, HTTP::UserAgent is preferred over LWP::Simple. It does work to spec now, so I'm using it... El mar., 15 may. 2018 a las 8:44, ToddAndMargo () escribió: > On 05/14/2018 02:42 AM, JJ Merelo wrote: > > Maybe this will work > > > > use HTTP::UserAgent; > > > > my $ua = HTTP

Re: Need help converting from Perl 5

2018-05-14 Thread ToddAndMargo
On 05/14/2018 02:42 AM, JJ Merelo wrote: 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+ \. .+?) \/}; } Hi

Re: Need help converting from Perl 5

2018-05-14 Thread Shlomi Fish
Hi Todd, On Sun, 13 May 2018 22:07:59 -0700 ToddAndMargo wrote: > 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,

Re: Need help converting from Perl 5

2018-05-14 Thread JJ Merelo
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 StackOverfl

Re: Need help converting from Perl 5

2018-05-14 Thread ToddAndMargo
El lun., 14 may. 2018 a las 7:08, ToddAndMargo (>) 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. > > $ per

Re: Need help converting from Perl 5

2018-05-13 Thread ToddAndMargo
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

Re: need help with "next"

2017-05-24 Thread ToddAndMargo
On 05/24/2017 01:04 AM, Richard Hainsworth wrote: see https://docs.perl6.org/language/regexes#Subrules Fascinating and way over my head. Give me a year or two to catch up.

Re: need help with "next"

2017-05-24 Thread ToddAndMargo
On 05/24/2017 01:04 AM, Richard Hainsworth wrote: On 05/23/2017 10:31 PM, Richard Hainsworth wrote: > The code below seems unnecessarily complex. > > How about: > > my @Data = q:to/SAMPLE/; > > Mission D', > Sol Wheat, > Ted Moon, > ; > > SAMPLE > > for @Data { >

Re: need help with "next"

2017-05-24 Thread Richard Hainsworth
On 05/23/2017 10:31 PM, Richard Hainsworth wrote: > The code below seems unnecessarily complex. > > How about: > > my @Data = q:to/SAMPLE/; > > Mission D', > Sol Wheat, > Ted Moon, > ; > > SAMPLE > > for @Data { > next unless m/ 'NAME' .*? '>' $=( .*? ) '<' /; >

Re: need help with "next"

2017-05-24 Thread ToddAndMargo
On 05/24/2017 12:02 AM, Norman Gaywood wrote: On 24 May 2017 at 16:40, Norman Gaywood > wrote: However, your code does not look like it will do what you want if you have multiple TASKs Yes it does. Sorry ignore me :-) Oh it had issues. They showe

Re: need help with "next"

2017-05-24 Thread ToddAndMargo
On 05/23/2017 11:40 PM, Norman Gaywood wrote: I'm a rank beginner p6 programmer so You are further along than me!

Re: need help with "next"

2017-05-24 Thread ToddAndMargo
On 05/23/2017 11:40 PM, Norman Gaywood wrote: However, your code does not look like it will do what you want if you have multiple TASKs I improved it. See my other follow post #3

Re: need help with "next"

2017-05-24 Thread ToddAndMargo
Oh, you know what, I thought it might be a good idea to throw some negative case data into the mix. This is what I came up with: #!/usr/bin/env perl6 use strict; my @Data = 'Mission A', ' Peter Meter', ' John Deer', ' Sam Horse', '',

Re: need help with "next"

2017-05-24 Thread Norman Gaywood
On 24 May 2017 at 16:40, Norman Gaywood wrote: > > However, your code does not look like it will do what you want if you have >> multiple TASKs >> > > Yes it does. Sorry ignore me :-) -- Norman Gaywood, Computer Systems Officer School of Science and Technology University of New England Armidal

Re: need help with "next"

2017-05-23 Thread Norman Gaywood
On 24 May 2017 at 15:20, ToddAndMargo wrote: > > > This is what I came up with. I found that `next` did not serve me > well, so i just used a tag. > > Thank you all for the help. I had a bit of a time wrapping > my head around `next` there for a while. > > -T > > > #!/usr/bin/env perl6 > > use

Re: need help with "next"

2017-05-23 Thread ToddAndMargo
On Wednesday, May 24, 2017 01:20 PM, ToddAndMargo wrote: On 05/23/2017 09:30 PM, ToddAndMargo wrote: Hi All, I have a test code in progress and I haven't figured out how to get 'next' to work the way I want. next if $Line.contains( "TASK type" ); works, but if $Line.contains( "TA

Re: need help with "next"

2017-05-23 Thread Richard Hainsworth
The code below seems unnecessarily complex. How about: my @Data = q:to/SAMPLE/; Mission D', Sol Wheat, Ted Moon, ; SAMPLE for @Data { next unless m/ 'NAME' .*? '>' $=( .*? ) '<' /; say $; # say implicitly stringifies $ } On Wednesday, May 24, 2017 01:20 PM,

Re: need help with "next"

2017-05-23 Thread ToddAndMargo
On 05/23/2017 09:30 PM, ToddAndMargo wrote: Hi All, I have a test code in progress and I haven't figured out how to get 'next' to work the way I want. next if $Line.contains( "TASK type" ); works, but if $Line.contains( "TASK type" ) { next; does not. What am I missing? M

Re: need help with "next"

2017-05-23 Thread ToddAndMargo
Any data fulfilling the 'if' condition, and thus entering this block will be 'next'ed. Nothing will pass the 'next'. But no data not fulfilling the condition will 'see' the code below, which is not what you intend. Perhaps you omitted an 'else' clause after the 'next' statement? Okay I get i

Re: need help with "next"

2017-05-23 Thread Richard Hainsworth
On Wednesday, May 24, 2017 12:46 PM, ToddAndMargo wrote: On Tue, May 23, 2017 at 11:30 PM, ToddAndMargo wrote: Hi All, I have a test code in progress and I haven't figured out how to get 'next' to work the way I want. next if $Line.contains( "TASK type" ); works, but if $Line.co

Re: need help with "next"

2017-05-23 Thread ToddAndMargo
On Tue, May 23, 2017 at 11:30 PM, ToddAndMargo wrote: Hi All, I have a test code in progress and I haven't figured out how to get 'next' to work the way I want. next if $Line.contains( "TASK type" ); works, but if $Line.contains( "TASK type" ) { next; does not. What am

Re: need help with "next"

2017-05-23 Thread Brad Gilbert
You do realize that `next` immediately stops the current iteration and goes onto the *next* one right? That is, there is no point putting any code after it because it will never be run. On Tue, May 23, 2017 at 11:30 PM, ToddAndMargo wrote: > Hi All, > > I have a test code in progress and I haven'

Re: Need help with a match

2017-03-13 Thread Richard Hainsworth
Seems to me because the second '(' is not preceded by a space; it is '`('. But if the second '(' was eg '` (', then the longest match would have been picked and a ? would be necessary. On Tuesday, March 14, 2017 11:21 AM, ToddAndMargo wrote: On 03/13/2017 08:16 PM, ToddAndMargo wrote: On 03

Re: Need help with a match

2017-03-13 Thread ToddAndMargo
On 03/13/2017 08:16 PM, ToddAndMargo wrote: On 03/13/2017 07:53 PM, yary wrote: I think p6 regexes behave a bit like p5 regexes with the "x" flag turned on, where whitespace can be added in for readability. To have literal whitespace, put quotes around it. Like this (untested) $x ~~ m/sub ' '

Re: Need help with a match

2017-03-13 Thread ToddAndMargo
On 03/13/2017 07:53 PM, yary wrote: I think p6 regexes behave a bit like p5 regexes with the "x" flag turned on, where whitespace can be added in for readability. To have literal whitespace, put quotes around it. Like this (untested) $x ~~ m/sub ' ' (.*) ' ' \(/; Now that was way to easy and

Re: Need help with a match

2017-03-13 Thread ToddAndMargo
On 03/13/2017 07:58 PM, Brandon Allbery wrote: There is actually a third issue in that spaces are *ignored* in regexes, so you actually end up with $/[0] eq ' Test'. Use the <.ws> rule to avoid this. (The leading dot prevents that whitespace from additionally being captured as $/ which here would

Re: Need help with a match

2017-03-13 Thread Brandon Allbery
There is actually a third issue in that spaces are *ignored* in regexes, so you actually end up with $/[0] eq ' Test'. Use the <.ws> rule to avoid this. (The leading dot prevents that whitespace from additionally being captured as $/ which here would be pointless. You might also want one before the

Re: Need help with a match

2017-03-13 Thread yary
I think p6 regexes behave a bit like p5 regexes with the "x" flag turned on, where whitespace can be added in for readability. To have literal whitespace, put quotes around it. Like this (untested) $x ~~ m/sub ' ' (.*) ' ' \(/;

Re: Need help with a match

2017-03-13 Thread Brandon Allbery
You have two problems: (1) matches start from 0, not 1. (2) .* gobbles as much as possible (this is also true in Perl 5) so it matches to the ) at the end of (Sub|63218616). As in Perl 5, you add a ? to make it take the shortest match instead: #!/usr/bin/perl6 my $x='sub Test () { #`(Sub|63218616

Re: need {} help

2017-02-18 Thread ToddAndMargo
On 02/18/2017 04:47 PM, Timo Paulssen wrote: / doesn't have a meaning in regex, but it's not an alpha character, so if you want to "match literally" it "must be quoted" as the first error message tells you. On top of that, balanced characters like () and {} aren't allowed for the s/// form (only

Re: need {} help

2017-02-18 Thread Timo Paulssen
/ doesn't have a meaning in regex, but it's not an alpha character, so if you want to "match literally" it "must be quoted" as the first error message tells you. On top of that, balanced characters like () and {} aren't allowed for the s/// form (only for the assignment form which looks like s{ fo

Re: Need help with Nil values

2016-02-23 Thread Lloyd Fournier
> > Regards, > > Emiliano > > > -- > *From:* Brandon Allbery > *Sent:* Tuesday, February 23, 2016 2:21 AM > *To:* TS xx > *Cc:* perl6-us...@perl.org > > *Subject:* Re: Need help with Nil values > On Mon, Feb 22, 2016 at 9:15 PM, TS xx wrote: > &g

Re: Need help with Nil values

2016-02-22 Thread TS xx
Thanks Brandon, That was what I was looking for. I'm trying it already. Regards, Emiliano From: Brandon Allbery Sent: Tuesday, February 23, 2016 2:21 AM To: TS xx Cc: perl6-us...@perl.org Subject: Re: Need help with Nil values On Mon, Feb 22, 2016

Re: Need help with Nil values

2016-02-22 Thread TS xx
Thanks, That was it. Somtimes I get confused with the way other languages treat undefined/null/nil values. Regards, Emiliano From: Timo Paulssen Sent: Tuesday, February 23, 2016 2:20 AM To: perl6-us...@perl.org Subject: Re: Need help with Nil values

Re: Need help with Nil values

2016-02-22 Thread Brandon Allbery
On Mon, Feb 22, 2016 at 9:15 PM, TS xx wrote: > I expect $.value to hold Strings, but I want to be able to instantiate > MyClass whether I have a value already or not, and I also want to be able > to tell if $.value has a real String or not. Is this possible? You don't want Nil there; it's not

Re: Need help with Nil values

2016-02-22 Thread Timo Paulssen
Hello Emiliano, In this case, I think you may want to use just "Str" instead of "Nil". "Str" is the "type object" for Str objects, and you can check whether it's a string like "foo" or just the Str object by checking $!value.defined. There's a FAQ answer that's about "Any", but it works the s

Re: Need Help with Perl 6 Module Test::Builder

2015-04-01 Thread Tom Browder
On Wed, Apr 1, 2015 at 5:22 PM, Tom Browder wrote: > On Apr 1, 2015 4:57 PM, "David Warring" wrote: >> I'm seeing the failure(s) as well. >> I've put in a PR that hopefully addresses this issue >> While we're waiting for the author, you can try checkout out, and >> building https://github.com/dwa

Re: Need Help with Perl 6 Module Test::Builder

2015-04-01 Thread Tom Browder
On Apr 1, 2015 4:57 PM, "David Warring" wrote: > I'm seeing the failure(s) as well. > I've put in a PR that hopefully addresses this issue > While we're waiting for the author, you can try checkout out, and > building https://github.com/dwarring/p6-test-builder.git Thanks a heap, David! I'll giv

Re: Need Help with Perl 6 Module Test::Builder

2015-04-01 Thread David Warring
Hi Tom, I'm seeing the failure(s) as well. I've put in a PR that hopefully addresses this issue - https://github.com/soh-cah-toa/p6-test-builder/pull/2. While we're waiting for the author, you can try checkout out, and building https://github.com/dwarring/p6-test-builder.git Cheers, David On T

Re: Need help with: Cannot find method 'postcircumfix:<( )>'...

2015-03-20 Thread Tom Browder
On Thu, Mar 19, 2015 at 9:26 PM, Tom Browder wrote: > On Mar 19, 2015 8:58 PM, "Brandon Allbery" wrote: >> On Thu, Mar 19, 2015 at 9:32 PM, Tom Browder >> wrote: >>> >>> if (self.$elem) { # <=== LINE 995 === LINE 995 >> This is an indirect method call. Is that really what you

Re: Need help with: Cannot find method 'postcircumfix:<( )>'...

2015-03-20 Thread Moritz Lenz
On 03/20/2015 11:00 AM, Timo Paulssen wrote: On 03/20/2015 03:40 AM, Brandon Allbery wrote: On Thu, Mar 19, 2015 at 10:33 PM, Tom Browder mailto:tom.brow...@gmail.com>> wrote: Why do you say that is not a method? The first line says Sorry, somehow I managed to misread that. So you wa

Re: Need help with: Cannot find method 'postcircumfix:<( )>'...

2015-03-20 Thread Timo Paulssen
On 03/20/2015 03:40 AM, Brandon Allbery wrote: > > On Thu, Mar 19, 2015 at 10:33 PM, Tom Browder > wrote: > > Why do you say that is not a method? The first line says > > > Sorry, somehow I managed to misread that. > > So you want what I have already said twice:

Re: Need help with: Cannot find method 'postcircumfix:<( )>'...

2015-03-19 Thread Tom Browder
Thanks for pointing out the error and the best practice comment. When I get the method to do what I really want I will post the solution. Best, -Tom

Re: Need help with: Cannot find method 'postcircumfix:<( )>'...

2015-03-19 Thread Brandon Allbery
On Thu, Mar 19, 2015 at 10:33 PM, Tom Browder wrote: > Why do you say that is not a method? The first line says Sorry, somehow I managed to misread that. So you want what I have already said twice: the accessor `self.elem`. If you want to access the variable directly for some reason, you use

Re: Need help with: Cannot find method 'postcircumfix:<( )>'...

2015-03-19 Thread Tom Browder
On Mar 19, 2015 9:30 PM, "Brandon Allbery" wrote: > Unless there is more that you didn't show, that function is not a method and has no `self`. [Please ignore last msg sent prematurely.] Why do you say that? The first line says it is a private method. -Tom

Re: Need help with: Cannot find method 'postcircumfix:<( )>'...

2015-03-19 Thread Tom Browder
On Mar 19, 2015 9:30 PM, "Brandon Allbery" wrote: > > On Thu, Mar 19, 2015 at 10:26 PM, Tom Browder wrote: >> >> On Mar 19, 2015 8:58 PM, "Brandon Allbery" wrote: >> > On Thu, Mar 19, 2015 at 9:32 PM, Tom Browder wrote: >> >> >> >> if (self.$elem) { # <=== LINE 995 === LINE

Re: Need help with: Cannot find method 'postcircumfix:<( )>'...

2015-03-19 Thread Brandon Allbery
On Thu, Mar 19, 2015 at 10:26 PM, Tom Browder wrote: > On Mar 19, 2015 8:58 PM, "Brandon Allbery" wrote: > > On Thu, Mar 19, 2015 at 9:32 PM, Tom Browder > wrote: > >> > >> if (self.$elem) { # <=== LINE 995 === LINE 995 > > This is an indirect method call. Is that really wha

Re: Need help with: Cannot find method 'postcircumfix:<( )>'...

2015-03-19 Thread Tom Browder
On Mar 19, 2015 8:58 PM, "Brandon Allbery" wrote: > On Thu, Mar 19, 2015 at 9:32 PM, Tom Browder wrote: >> >> if (self.$elem) { # <=== LINE 995 === LINE 995 > This is an indirect method call. Is that really what you intended? No, it's supposed to be the value of the self attr

Re: Need help with: Cannot find method 'postcircumfix:<( )>'...

2015-03-19 Thread Brandon Allbery
On Thu, Mar 19, 2015 at 9:32 PM, Tom Browder wrote: > if (self.$elem) { # <=== LINE 995 === LINE 995 > This is an indirect method call. Is that really what you intended? If you wanted the `my` variable, it's just `$elem`. If you somehow have an object in scope there (I don'

Re: Need help in writing PCRE

2007-08-09 Thread Will Coleda
[EMAIL PROTECTED] writes: Thanks for the suggestion.Actually, i am trying this in Perl thats why i post it here. This mailing list is for discussion of the internals of the parrot bytecode engine that Perl 6 will run on. Perl 5 stuff is still off topic here, sorry. I recommend starting at h

Re: Need help in writing PCRE

2007-08-09 Thread vikrant . kansal
On Aug 9, 10:51 pm, [EMAIL PROTECTED] (Andy Lester) wrote: > > Can u guys help me out in writing the pcre for the following string > > I'm afraid not. This mailing list is strictly for discussion of Perl 6. > It's not a help list. > > Also, you may find that "PCRE" is not really that Perl-compatib

Re: Need help in writing PCRE

2007-08-09 Thread Andy Lester
> Can u guys help me out in writing the pcre for the following string I'm afraid not. This mailing list is strictly for discussion of Perl 6. It's not a help list. Also, you may find that "PCRE" is not really that Perl-compatible. I suggest you find a PHP mailing list to help you on this (assum

Re: Need help diagnosing Test-Simple-0.62 make test error

2006-01-16 Thread David Golden
James E Keenan wrote: What happens with: prove -vb t/sort_bug.t It was in the next section via make with TEST_VERBOSE. Subtests complete successfully then the test dies. t/sort_bug1..2 # parent 2267: continue # kid 1 before eq_set # parent 2267: continue # parent 2267: waiting for joi

Re: Need help diagnosing Test-Simple-0.62 make test error

2006-01-16 Thread James E Keenan
David Golden wrote: Dear Michael and Perl QA colleagues, Wes Barris was trying to install one of my modules and encountered a dependency problem when Test-Simple-0.62 failed to make on his system. I was able to get some additional details, but I'm not sure what advice to offer him. The prob

Re: need help

2004-12-18 Thread James E Keenan
Sridhar Subbarayan wrote: Hi, I am urgently in need of some study material that deals with using perl in QA process. How is functionality testing done using perl. How is performance testing done using perl. How does perl help in automation. Please give some examples. Please let me know if there ar

Re: need help on perl scripts #1 newuser.pl

2002-08-28 Thread Luke Palmer
This is really the wrong place to be sending this. This is Perl 5 (or maybe even Perl 4, which I don't know) code, and this is a list for discussing the design of Perl 6. A good place to send this would probably be [EMAIL PROTECTED] Good Luck, Luke On Wed, 28 Aug 2002, frank crowley wrote:

Re: need help making auction

2002-01-23 Thread Melvin Smith
At 01:43 PM 1/23/2002 -0800, you wrote: >i need help on making it into an auction that will >work. Ok I thought so. You might try [EMAIL PROTECTED] for some beginner tips but I doubt you want to submit a whole script, maybe rephrase your stuff into specific problems you are having. Good luck,

Re: need help making auction

2002-01-23 Thread Casey West
On Wed, Jan 23, 2002 at 01:39:09PM -0800, frank crowley wrote: : :see attached file. Hi frank, This mailing list is not designed to help folks get their Perl 5 programs working. EverySoft, the company that built the program you attatched has their own online forum for helping you. Home Page:

Re: need help making auction

2002-01-23 Thread Melvin Smith
At 01:39 PM 1/23/2002 -0800, frank crowley wrote: >see attached file. > > >= >frank crowley What is it that you wanted us to see? -Melvin