open( my $fh, '<', "$confpath/mksysbmachinelist.conf" ) or die $!;
while( my $line = <$fh> ) {
...