$file =~ s/^append/aPPend/;