17 lines
393 B
Nix
17 lines
393 B
Nix
{ perl, perlPackages, ... }:
|
|
|
|
''
|
|
#!${perl}/bin/perl
|
|
|
|
use strict;
|
|
use warnings;
|
|
use Data::Dumper;
|
|
|
|
use lib "${perlPackages.JSON}/${perl.libPrefix}/${perl.version}/";
|
|
use JSON qw{ decode_json encode_json };
|
|
|
|
my $info = decode_json(`nixos-version --json`);
|
|
$info->{needs_restart} = system('check-restart >/dev/null') == 0 ? JSON::false : JSON::true;
|
|
print encode_json $info;
|
|
''
|