perl -i.can -please file