sub getComment { my $switchIp = $_[0]; my $INFILE; open ($INFILE, 'templateHosts' ) or die "can't open file $!"; my @hostsText = <$INFILE>; my $hostsLine = ""; #### open ($INFILE, '<', 'templateHosts') open ($INFILE, '< templateHosts') open $INFILE, '