今天我安装了 Rakudo Star 2012.07 并尝试编写一个简单的 Perl 6 脚本:
#!/usr/bin/env perl6
use v6;
use LWP::Simple;
my $html = LWP::Simple.get('http://perl6.org');
say $html;
由于以下错误,它不起作用:
No such method 'get_string' for invocant of type 'String'
in method decode at src/gen/CORE.setting:6766
in method parse_response at lib/LWP/Simple.pm:244
in method make_request at lib/LWP/Simple.pm:199
in method request_shell at lib/LWP/Simple.pm:63
in method get at lib/LWP/Simple.pm:28
第 244 行的 LWP::Simple 代码为:
my @header_lines = $resp.subbuf(
0, $header_end_pos
).decode('ascii').split(/\r\n/);
奇怪的是,下面的代码是可以的:
> Buf.new(1,2,3,4,5).decode('ascii')
而这个失败:
> Buf.new(1,2,3,4,5).subbuf(0,3).decode('ascii')
Method 'get_string' not found for invocant of class 'String'
请你解释一下,为什么会这样?据我所知,在这两种情况下都调用了 Buf.decode 方法:
> Buf.new(1,2,3,4,5).subbuf(0,3).isa('Buf')
True
> Buf.new(1,2,3,4,5).isa('Buf')
True
也许这是 Rakudo Perl 中的一个错误?或者 subbuf 是一种已弃用/未记录的方法?它不在 doc.perl6.org 上。在这种情况下应该使用哪种方法?