[me]$ ls -a .sav*
.saves-19639-~ .saves-19896-~ .saves-19896333-~ .saves-22-~
[me]$ perl tmp
+ ./.saves-22-~- ./.saves-19896333-~+ ./.saves-19639-~- ./.saves-19896-~[me]$
####
[me]$ perl -w tmp
Useless use of single ref constructor in void context at tmp line 2.
Odd number of elements in hash assignment at tmp line 2.
Use of uninitialized value in print at tmp line 3.
+ ./.saves-22-~Odd number of elements in hash assignment at tmp line 2.
- ./.saves-19896-~Use of uninitialized value in print at tmp line 3.
Odd number of elements in hash assignment at tmp line 2.
Use of uninitialized value in print at tmp line 3.
+ ./.saves-19639-~Odd number of elements in hash assignment at tmp line 2.
- ./.saves-19896333-~Use of uninitialized value in print at tmp line 3.
##
##
`@$_`?{print"+ $1"}:{print"- $1"}&&`rm $1`;
##
##
`@$_`?print"+ $1":print("- $1")&&`rm $1`;
##
##
[me]$ perl -w tmp
Use of uninitialized value in print at tmp line 3.
+ ./.saves-22-~- ./.saves-19896333-~Use of uninitialized value in print at tmp line 3.
+ ./.saves-19639-~- ./.saves-19896-~Use of uninitialized value in print at tmp line 3.
##
##
print$\; # cause of last warning
#replacements
print$/;
print"\n";
print qq'\n';
#etc.
##
##
[me]$ perl tmp
+ ./.saves-22-~
- ./.saves-19896333-~
+ ./.saves-19639-~
- ./.saves-19896-~
[@me]$