use strict;
use warnings;
use base qw/Catalyst::View/;
use IO::Pipe;
{
my ($self, $c) = @_;
$c->response->content_type('application/x-nix-export');
my @storePaths = @{$c->stash->{ }};
my $fh = IO::Handle->new();
open($fh, "-|", "nix-store --export `nix-store -qR @storePaths` | gzip");
$c->response->body($fh);
return 1;
}
1;