Ways to arrange the integers 1 to 9 with operators so that the result is 100
Perl 5.10.0 - 50 46 45B

say for grep{eval==100}glob join'{,+,-}',1..9


Usage: perl -M5.10.0 scratch.pl (I think I get the version for free)