#!/usr/bin/perl ($ss,$mm,$hh,$dd,$mon,$yy,$we,$doy,$st)=localtime; $mon=$mon+1; if ($mon<10) { $mon="0" . $mon; } if ($dd <10) { $dd="0" . $dd; } if ($hh <10) { $hh="0" . $hh; } if ($mm <10) { $mm="0" . $mm; } if ($ss <10) { $ss="0" . $ss; } $yy=$yy+1900; $date=$yy . "-" . $mon . "-" . $dd; open CONF,") { chomp; print "Konfiguriere Switch $_\n"; `./procurve_config.sh admin LTBBffD45 $_`; } close CONF;