#!/usr/bin/perl ### cleanmathsPIC.pl ## for Unix/Linux only ## removes all unnecessary files to facilitate archiving etc ## RWD Nickalls 2005 ##--------------------------------------- ## -w ## turned off for the moment ##------------------ system ("mv -vf *.dvi ~/allfiles/trashcan"); system ("mv -vf *.aux ~/allfiles/trashcan"); system ("mv -vf *.mt ~/allfiles/trashcan"); system ("mv -vf *.mlg ~/allfiles/trashcan"); #system ("mv -vf *.idx ~/allfiles/trashcan"); #system ("mv -vf *.ind ~/allfiles/trashcan"); #system ("mv -vf *.glo ~/allfiles/trashcan"); #system ("mv -vf *.bbl ~/allfiles/trashcan"); ## ask permission for the .pic/.log/.gnu just in case system ("mv -vf *.log ~/allfiles/trashcan"); __END__