fixup perlcritic: indirect new

> Subroutine new called using indirect syntax at line 14, column 14.  See page 349 of PBP.  (Severity: 5)
This commit is contained in:
Your Name
2021-08-19 16:25:21 -04:00
parent 241985fb2d
commit 4632132d02
5 changed files with 6 additions and 6 deletions

View File

@ -11,7 +11,7 @@ sub process {
my @storePaths = @{$c->stash->{storePaths}};
my $fh = new IO::Handle;
my $fh = IO::Handle->new();
open $fh, "nix-store --export `nix-store -qR @storePaths` | gzip |";

View File

@ -11,7 +11,7 @@ sub process {
$c->response->content_type('text/plain; charset=utf-8');
my $fh = new IO::Handle;
my $fh = IO::Handle->new();
my $tail = int($c->stash->{tail} // "0");

View File

@ -13,7 +13,7 @@ sub process {
$c->response->content_type('application/x-nix-archive'); # !!! check MIME type
my $fh = new IO::Handle;
my $fh = IO::Handle->new();
open $fh, "nix-store --dump '$storePath' | pixz -0 $pParam |";