Posted to none by aspect at Sun Aug 21 02:26:26 GMT 2011view pretty
#!/bin/rc filter() { read p || exit while read x; do if [ `expr $x % $p` != 0 ]; then echo $x fi done | filter } seq 2 100 | filter
#!/bin/rc filter() { read p || exit while read x; do if [ `expr $x % $p` != 0 ]; then echo $x fi done | filter } seq 2 100 | filter