如何在Perl 6中打开字符串上的文件句柄？

Question

In Perl 5, I can open a filehandle on string like this:

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

I have a scenario that uses string as a filehandle and passes it to the open method:

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

where $message->payload is read from Kafka , and the content is a byte array. raiph had a similar question , but it didn't answer my question.

So I want to know how to open a filehandle on a string in Perl 6 like Perl 5 does? These documentation pages have no information on this:

• open
• filehandle
• IO::Handle

Answer 1

EDIT: See this question for how to do what @raiph says about opening a filehandle to a string. Also, read @raiph's comments.

This is how to open a filehandle to a file from a string, not how to open a filehandle to a string without a file being involved. Thanks to @raiph for clarifying the OP's meaning.

---

The documentation has a section called Input/Output that describes this process.

One way to read the contents of a file is to open the file via the open function with the :r (read) file mode option and slurp in the contents:

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

Here we explicitly close the filehandle using the close method on the IO::Handle object. This is a very traditional way of reading the contents of a file. However, the same can be done more easily and clearly like so:

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

By adding the IO role to the file name string, we are effectively able to refer to the string as the file object itself and thus slurp in its contents directly. Note that the slurp takes care of opening and closing the file for you.

This is also found in the Perl5 to Perl6 pages as well.

In Perl 5, a common idiom for reading the lines of a text file goes something like this:

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

In Perl 6, this has been simplified to

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

Further references to do this are found in the IO::Handle documentation:

Instances of IO::Handle encapsulate an handle to manipulate input/output resources. Usually there is no need to create directly an IO::Handle instance, since it will be done by other roles and methods. For instance, an IO::Path object provides an open method that returns an IO::Handle :

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