open(SNMPFILE,"+< $local_dir\/cpsnmpagent.cfg"); @ARRAY = ; foreach $element (@ARRAY) { if ($element=~/^PABPT.ROW/) { print "$element matches\n"; $element =~ s/$element//; print "element is now $element\n"; } } seek(SNMPFILE,0,0); print SNMPFILE @ARRAY; truncate(SNMPFILE,tell(SNMPFILE)); print SNMPFILE "$conf_chg0\n"; close(SNMPFILE); #### bash-2.03# PABPT.ROW.0= 1000 marks_pabs * 4211 pabd 1 1 5 password matches element is now PABPT.ROW.0= 1000 marks_pabs * 4211 pabd 1 1 5 password PABPT.ROW.0= 34567 pabs_works 10.41.0.70 4211 pabd 1 1 5 password matches element is now