$var1=~s/\.xml$/.jpg/;