]
#!/usr/bin/perl

use warnings;
use strict;
use diagnostics;

print ("after entering the password, the box will shutdown ...");
my $shutdown = qx{sudo /sbin/shutdown -h now};