return send_file( '/dev/zero', streaming => 1, system_path => 1, content_type => $mime_type, callbacks => { around => sub { my ($writer, $content) = @_; my $buf = ''; while( read( $in_fh, $buf, VID_READ_LENGTH ) ) { $writer->write( $buf ); } } }, );