perl -e '$\="\n";$tempvalue = "c:/reports/check/test.txt"; print $tempvalue if $tempvalue =~ s/\/([^\/]+)$/\/design.$1/g'