代码之家 › 专栏 › 技术社区 › chenyf

如何在Perl6中打开字符串上的文件句柄?

filehandle perl6 perl string

6

chenyf · 技术社区 · 8 年前

在Perl5中,我可以这样打开字符串上的文件句柄:

open my $kfh, "<", \$message->payload;

我有一个场景使用字符串作为文件句柄,并将其传递给 open 方法:

my $fh = new IO::Zlib;
open my $kfh, "<", \$message->payload;
if($fh->open($kfh, 'rb')){
   print <$fh>;
   $fh->close;
}

哪里 $message->payload 从中读取 Kafka ,内容是字节数组。 raiph 有一个 similar question 但它没有回答我的问题。

所以我想知道如何像Perl5一样在Perl6中打开一个字符串上的文件句柄?这些文档页没有关于以下内容的信息:

1 回复 | 直到 8 年前

1

4

callyalater ingleback 8 年前

my $fh = open "testfile", :r;
my $contents = $fh.slurp-rest;
$fh.close;

my $contents = "testfile".IO.slurp;
# or in procedural form: 
$contents = slurp "testfile"

open my $fh, "<", "file" or die "$!";
my @lines = <$fh>;                # lines are NOT chomped 
close $fh;`

my @lines = "file".IO.lines; # auto-chomped

IO::Path

my $fh = '/tmp/log.txt'.IO.open;
say $fh.^name; # OUTPUT: IO::Handle