#!/usr/bin/perl use Test::Script tests => 5; script_compiles('inxi', "script compiles"); script_runs(['inxi', '--no-sudo', '--full', '--verbosity', '8'], "full output"); script_runs(['inxi', '--version'], "version check"); script_runs(['inxi', '--update'], { exit => 20 }, "update disabled"); script_runs(['inxi', '--kvack'], { exit => 22 }, "unsupported option"); done_testing;