On 10/8/18 5:33 AM, Curt Tilmes wrote:
On Mon, Oct 8, 2018 at 7:53 AM ToddAndMargo via perl6-users
mailto:perl6-users@perl.org>> wrote:
I take it that `Buf` is a special type of array that the normal
rules do not apply to.
I would say rather than each of them (Buf and Array) are
On 10/8/18 4:50 AM, ToddAndMargo via perl6-users wrote:
On 10/8/18 4:25 AM, Curt Tilmes wrote:
On Mon, Oct 8, 2018 at 7:21 AM ToddAndMargo via perl6-users
mailto:perl6-users@perl.org>> wrote:
> I never have to say `$str[0..*]` when looping over a
string. Why?
>
>
On 10/8/18 4:25 AM, Curt Tilmes wrote:
On Mon, Oct 8, 2018 at 7:21 AM ToddAndMargo via perl6-users
mailto:perl6-users@perl.org>> wrote:
> I never have to say `$str[0..*]` when looping over a string.
Why?
>
>
> How do you loop over a string? Doesn't 'for $str'
On 10/8/18 4:29 AM, ToddAndMargo via perl6-users wrote:
On 10/8/18 4:20 AM, ToddAndMargo via perl6-users wrote:
On 10/8/18 4:14 AM, Curt Tilmes wrote:
On Mon, Oct 8, 2018 at 7:06 AM ToddAndMargo via perl6-users
mailto:perl6-users@perl.org>> wrote:
$ p6 'my $fh=open
On 10/8/18 4:20 AM, ToddAndMargo via perl6-users wrote:
On 10/8/18 4:14 AM, Curt Tilmes wrote:
On Mon, Oct 8, 2018 at 7:06 AM ToddAndMargo via perl6-users
mailto:perl6-users@perl.org>> wrote:
$ p6 'my $fh=open "/home/linuxutil/To", :r; my Buf $f = $fh.read(
10 );
$fh.close; dd
On 10/8/18 4:14 AM, Curt Tilmes wrote:
On Mon, Oct 8, 2018 at 7:06 AM ToddAndMargo via perl6-users
mailto:perl6-users@perl.org>> wrote:
$ p6 'my $fh=open "/home/linuxutil/To", :r; my Buf $f = $fh.read( 10 );
$fh.close; dd $f; for $f[0..*] -> $Byte { if $Byte == 0b00 {say
On 10/8/18 4:14 AM, Curt Tilmes wrote:
On Mon, Oct 8, 2018 at 7:06 AM ToddAndMargo via perl6-users
mailto:perl6-users@perl.org>> wrote:
$ p6 'my $fh=open "/home/linuxutil/To", :r; my Buf $f = $fh.read( 10 );
$fh.close; dd $f; for $f[0..*] -> $Byte { if $Byte == 0b00 {say
On Mon, Oct 8, 2018 at 7:06 AM ToddAndMargo via perl6-users <
perl6-users@perl.org> wrote:
> $ p6 'my $fh=open "/home/linuxutil/To", :r; my Buf $f = $fh.read( 10 );
> $fh.close; dd $f; for $f[0..*] -> $Byte { if $Byte == 0b00 {say
> "Binary"; last;}else{say $Byte}}'
>
> Buf[uint8] $f =
$ p6 'my $fh=open "/home/linuxutil/To", :r; my Buf $f = $fh.read( 10 );
$fh.close; dd $f; for $f[0..*] -> $Byte { if $Byte == 0b00 {say
"Binary"; last;}else{say $Byte}}'
Buf[uint8] $f = Buf[uint8].new(87,111,114,100,80,114,111,0,0,0)
87
111
114
100
80
114
111
Binary
To get the above to work,