#!/bin/bash

perl -pi -e 's/[\t\r\f ]+$//g' $@

for file in $@
do
	rm "$file.bak"
	echo "$file done!"
done