Good chance it will if: a. that works in plain Perl b. you have Inline::Perl5 installed c. you do "use Net::FTP:from<Perl5>" d. you change -> to .
> On 9 Aug 2022, at 11:46, ToddAndMargo via perl6-users <perl6-us...@perl.org> > wrote: > > On 8/9/22 00:56, Elizabeth Mattijsen wrote: >>> On 9 Aug 2022, at 09:24, ToddAndMargo via perl6-users >>> <perl6-us...@perl.org> wrote: >>>>> On 9 Aug 2022, at 06:19, ToddAndMargo via perl6-users >>>>> <perl6-us...@perl.org> wrote: >>>>> >>>>> $ raku -Msigpipe -e 'loop { say "y"}' | sed 3q >>>>> ===SORRY!=== Error while compiling -e >>>>> Could not find sigpipe in: >>>>> /home/tony/.raku >>>>> /opt/rakudo-pkg/share/perl6/site >>>>> /opt/rakudo-pkg/share/perl6/vendor >>>>> /opt/rakudo-pkg/share/perl6/core >>>>> CompUnit::Repository::AbsolutePath<71837872> >>>>> CompUnit::Repository::NQP<63797000> >>>>> CompUnit::Repository::Perl5<63797040> >>>>> at -e:1 >>>>> >>>>> >>>>> Why are we looking in perl 5? >>> >>> >>> On 8/8/22 23:52, Elizabeth Mattijsen wrote: >>>> So that you can transparently say "use DBI:from<perl5>" >>>> >>> >>> Makes sense. >>> >>> Would you mind throwing up a simple >>> example off a call to a perl 5 module? >> $ perl -MTest::More -e 'ok 42, "foo"; done_testing' >> ok 1 - foo >> 1..1 >> $ raku -e 'use Test::More:from<Perl5>; ok 42, "foo"; done_testing' >> ok 1 - foo >> 1..1 > > > This this support something written in Perl 5's OOP? > > use Net::FTP; > > # Open a new FTP connnector > > $ftp = Net::FTP->new("$FtpServer", Passive=>1 ) > > or die "Cannot connect to $FtpServer: $@"; > > > > # Log on to the FTP site > > $ftp->login("$Username", "$Password") > > or die "Cannot login ", $ftp->message; > > > > # if $BkRoot does not exist, create it > > if ( not Exists ( "/", $BkRoot ) ) { $ftp->mkdir ( $BkRoot ); } > > > > ... > > > $ftp->quit; > > > > > -- > ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ > Computers are like air conditioners. > They malfunction when you open windows > ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~