#!/usr/bin/perl use strict; use PVE::INotify; use PVE::Cluster; use Sys::Hostname; my $nodename = PVE::INotify::nodename(); my $localip = PVE::Cluster::remote_node_ip($nodename, 1); #my $lastupdate = `date +%m/%d/%Y" "%l:%M:%S" "%p`; my $year = `date +%Y`; my $hostname = hostname; my $xline = '*' x 78; my $banner = ''; if ($localip) { $banner .= <<__EOBANNER; $xline @@@ @@@ @@@@@@@@ @@@@@@@ @@@@@@@ @@@@@@@ @@@@@@ @@@@@@ @@@@@@@@ @@@@ @@@ @@@@@@@@ @@@@@@@ @@@@@@@@ @@@@@@@@ @@@@@@@@ @@@@@@@@ @@@@@@@@ @@!@!@@@ @@! @@! @@! @@@ @@! @@@ @@! @@@ @@! @@@ @@! !@!!@!@! !@! !@! !@! @!@ !@! @!@ !@! @!@ !@! @!@ !@! @!@ !!@! @!!!:! @!! @!@@!@! @!@!!@! @!@ !@! @!@ !@! @!!!:! !@! !!! !!!!!: !!! !!@!!! !!@!@! !@! !!! !@! !!! !!!!!: !!: !!! !!: !!: !!: !!: :!! !!: !!! !!: !!! !!: :!: !:! :!: :!: :!: :!: !:! :!: !:! :!: !:! :!: :: :: :: :::: :: :: :: ::: ::::: :: ::::: :: :: :: : : :: :: : : : : : : : : : : : : netproof.co.uk $year $xline Welcome to $hostname Server. Please use your web browser to configure this server connect to https://${localip}:8006/ $xline __EOBANNER } open(ISSUE, ">/etc/motd"); print ISSUE $banner; close(ISSUE); exit (0);