write bytes requires an object with REPR MVMOSHandle

Hi All, I am stumped. This only screws up in the for loop. This is only the chopped up version #!/usr/bin/env perl6 my $SmtpIniFileName = $?FILE ~ ".ini"; my %SmtpIni = [ 'DebugTrace' => "", # 1 | 0 (-vvv) 'smtp' => "", # smtp.zoho.com

Re: -f ???

So $f = so "eraseme.txt".IO.f; Would do the trick? On Fri, 29 Sep 2017, 6:56 am Norman Gaywood, wrote: > On 29 September 2017 at 15:10, Brandon Allbery > wrote: > >> >> (And, Norman? It produces a Failure, not a hard exception. You can >> introspect

Re: -f ???

> This sounds broken, actually; I understand that a Failure treated as > a Bool > prevented it from throwing, so it should have simply returned > False. > > Checking it for .defined *does* prevent throwing. Still seems like a > bug. It doesn't get "treated as a Bool"; any Failure makes it through

Re: Any way to get hashes to loop in order?

On 09/29/2017 07:25 PM, Brandon Allbery wrote: On Fri, Sep 29, 2017 at 9:55 PM, ToddAndMargo > wrote: for %SmtpIni.kv -> $key, $value { say $key; } Does "say" the keys in the order that I created them. Is there a way to get

Any way to get hashes to loop in order?

Hi List, for %SmtpIni.kv -> $key, $value { say $key; } Does "say" the keys in the order that I created them. Is there a way to get them to do so? Many thanks, -T

Re: Any way to get hashes to loop in order?

On 09/29/2017 06:55 PM, ToddAndMargo wrote: Hi List, for %SmtpIni.kv -> $key, $value { say $key; } Does "say" the keys in the order that I created them. Does not Stinking typos Is there a way to get them to do so? Many thanks, -T -- ~~ Computers

Re: Any way to get hashes to loop in order?

On Fri, Sep 29, 2017 at 9:55 PM, ToddAndMargo wrote: > for %SmtpIni.kv -> $key, $value { say $key; } > > Does "say" the keys in the order that I created them. > > Is there a way to get them to do so? > Not without storing that order somewhere yourself and using it to

Re: -f ???

>> In other words, I think we should change the Perl 6 spec to define .f as >> "exists and is a file". >> >> -- >> Mark Montague Mark and I appear to be having a vigorous agreement about the principle of Least Surprise. If -f X is defined as meaning "X exists and is a file", then obviously

Re: -f ???

On 2017-09-29 09:53, Parrot Raiser wrote: -e is fairly easy. It asks if something exists. Ignoring Schrodinger, either it does (i.e True) or it doesn't. (False) -f is more ambiguous. It asks if something has a property (fileness) or not. If it exists, it either does or doesn't. [...] Bash

Re: -f ???

Discussing the full implications of these tests could probably keep a philosophy class busy for an afternnon. It might even rise to an LPU[1] paper. -e is fairly easy. It asks if something exists. Ignoring Schrodinger, either it does (i.e True) or it doesn't. (False) -f is more ambiguous. It asks

Re: Need append help

On 09/29/2017 10:54 AM, Brandon Allbery wrote: On Fri, Sep 29, 2017 at 1:49 PM, ToddAndMargo > wrote: I am trying to find a shorter way of doing      $x = $x ~ "def" But I can't seem to master "append" What am I doing

Re: Need append help

On Fri, Sep 29, 2017 at 1:49 PM, ToddAndMargo wrote: > I am trying to find a shorter way of doing > $x = $x ~ "def" > > But I can't seem to master "append" > > What am I doing wrong? > Again (as with last night in IRC) you are treating a string as a list. But a

Re: -f ???

On Fri, Sep 29, 2017 at 9:53 AM, Parrot Raiser <1parr...@gmail.com> wrote: > Discussing the full implications of these tests could probably keep a > philosophy class busy for an afternnon. It might even rise to an > LPU[1] paper. > It's even more involved than you think; I have notes for what

Need append help

Hi All, I am trying to find a shorter way of doing $x = $x ~ "def" But I can't seem to master "append" What am I doing wrong? Many thanks, -T https://docs.perl6.org/routine/append $ perl6 -e 'my $x="abc"; $x.append("def"); say $x;' Cannot resolve caller append(Str: Str); none of these

Re: Need append help

On Fri, Sep 29, 2017 at 2:04 PM, ToddAndMargo wrote: > $ perl6 -e 'my $x="abc"; $x ~= "def"; say $x;' > abcdef > > Perfect! Thank you! > > I am slowly getting away from my Modula 2 "Array of Characters" days. > > Question: Is thee a pretty way like the above to do a

Re: Need append help

On Fri, Sep 29, 2017 at 11:27 AM, Brandon Allbery wrote: > On Fri, Sep 29, 2017 at 2:04 PM, ToddAndMargo > wrote: > >> >> Question: Is thee a pretty way like the above to do a prepend? >> > > No, sorry. > Actually, there seems to be: > my $x =

Re: Need append help

On Fri, Sep 29, 2017 at 2:32 PM, Sean McAfee wrote: > On Fri, Sep 29, 2017 at 11:27 AM, Brandon Allbery > wrote: > >> On Fri, Sep 29, 2017 at 2:04 PM, ToddAndMargo >> wrote: >> >>> >>> Question: Is thee a pretty way like the above

Re: write bytes requires an object with REPR MVMOSHandle

close ( $SmtpHandle ); } Your indenting has done you wrong - you close the file handle inside the loop for loop, so it closed after the first print. On Fri, Sep 29, 2017 at 1:49 AM, ToddAndMargo wrote: > Hi All, > > I am stumped. This only screws up in the for loop.

Re: -f ???

One might argue that -f returning Failure is like a SQL query returning NULL, which is appealing to me. On Fri, Sep 29, 2017 at 4:05 PM, Mark Montague wrote: > On 2017-09-29 09:53, Parrot Raiser wrote: > >> -e is fairly easy. It asks if something exists. Ignoring Schrodinger,

Re: Need append help

On 09/29/2017 12:12 PM, Andy Bach wrote: Hmm $ perl6 -e 'my $x="abc"; $x [R~]= "yyz"; say $x;' yyzabc no space: $ perl6 -e 'my $x="abc"; $x[R~]= "yyz"; say $x;' ===SORRY!=== Error while compiling -e Missing required term after infix at -e:1 --> my $x="abc"; $x[R~⏏]= "yyz"; say $x;    

Re: Need append help

On 09/29/2017 09:27 PM, ToddAndMargo wrote: > $ perl6 -e 'my $x="abc"; $x [R~]= "yyz"; say $x;' > Potential difficulties: >     Useless use of [R~]= in sink context >     at -e:1 >     --> my $x="abc"; $x ⏏[R~]= "yyz"; say $x; > yyzabc This is the correct one. The warning about "useless use"

Re: Need append help

On Fri, Sep 29, 2017 at 3:27 PM, ToddAndMargo wrote: > I do not understand. :'( > There's not enough syntax to go around, so perl 6 has to use spaces sometimes to figure out what you want. > $ perl6 -e 'my $x="abc"; $x[R~]= "yyz"; say $x;' > ===SORRY!=== Error while

Re: Need append help

On 09/29/2017 12:41 PM, Brandon Allbery wrote: On Fri, Sep 29, 2017 at 3:27 PM, ToddAndMargo > wrote: I do not understand.  :'( There's not enough syntax to go around, so perl 6 has to use spaces sometimes to figure out what you want.

Re: write bytes requires an object with REPR MVMOSHandle

On 09/29/2017 12:22 PM, ToddAndMargo wrote: On Fri, Sep 29, 2017 at 1:49 AM, ToddAndMargo > wrote:     Hi All,     I am stumped.  This only screws up in the for loop.     This is only the chopped up version         #!/usr/bin/env perl6  

Re: Need append help

On 09/29/2017 11:32 AM, Sean McAfee wrote: On Fri, Sep 29, 2017 at 11:27 AM, Brandon Allbery > wrote: On Fri, Sep 29, 2017 at 2:04 PM, ToddAndMargo > wrote: Question:  Is

Re: Need append help

Hmm $ perl6 -e 'my $x="abc"; $x [R~]= "yyz"; say $x;' yyzabc no space: $ perl6 -e 'my $x="abc"; $x[R~]= "yyz"; say $x;' ===SORRY!=== Error while compiling -e Missing required term after infix at -e:1 --> my $x="abc"; $x[R~⏏]= "yyz"; say $x; expecting any of: prefix term $

Re: Need append help

On Fri, Sep 29, 2017 at 3:36 PM, ToddAndMargo wrote: > This is the correct one. The warning about "useless use" here is a bug >> in rakudo. It's meant to warn for things like >> > Another bug. Lucky me, again. :'( > > Thank you! > Also, this is about the third time in

Re: Need append help

On 09/29/2017 12:43 PM, Brandon Allbery wrote: On Fri, Sep 29, 2017 at 3:36 PM, ToddAndMargo > wrote: This is the correct one. The warning about "useless use" here is a bug in rakudo. It's meant to warn for things

Re: Need append help

On 09/29/2017 12:30 PM, Timo Paulssen wrote: On 09/29/2017 09:27 PM, ToddAndMargo wrote: $ perl6 -e 'my $x="abc"; $x [R~]= "yyz"; say $x;' Potential difficulties:     Useless use of [R~]= in sink context     at -e:1     --> my $x="abc"; $x ⏏[R~]= "yyz"; say $x; yyzabc This is the