#!/usr/local/bin/perl use warnings; use strict; use constant LOG_FILE => "/var/log/system-upgrade.log";