| Guido van Rossum | 21bc15b | 1995-04-10 11:40:26 +0000 | [diff] [blame] | 1 | Subject: Re: What language would you use? |
| 2 | From: Tom Christiansen <tchrist@mox.perl.com> |
| 3 | Date: 6 Nov 1994 15:14:51 GMT |
| 4 | Newsgroups: comp.lang.python,comp.lang.tcl,comp.lang.scheme,comp.lang.misc,comp.lang.perl |
| 5 | Message-Id: <39irtb$3t4@csnews.cs.Colorado.EDU> |
| 6 | References: <39b7ha$j9v@zeno.nscf.org> <39hhjp$lgn@csnews.cs.Colorado.EDU> <39hvsu$dus@mathserv.mps.ohio-state.edu> |
| 7 | |
| 8 | [...] |
| 9 | If you're really into benchmarks, I'd love it if someone were to code up |
| 10 | the following problems in tcl, python, and scheme (and whatever else you'd |
| 11 | like). Separate versions (one optimized for speed, one for beauty :-) are |
| 12 | ok. Post your code so we can time it on our own systems. |
| 13 | |
| 14 | 0) Factorial Test (numerics and function calls) |
| 15 | |
| 16 | (we did this already) |
| 17 | |
| 18 | 1) Regular Expressions Test |
| 19 | |
| 20 | Read a file of (extended per egrep) regular expressions (one per line), |
| 21 | and apply those to all files whose names are listed on the command line. |
| 22 | Basically, an 'egrep -f' simulator. Test it with 20 "vt100" patterns |
| 23 | against a five /etc/termcap files. Tests using more elaborate patters |
| 24 | would also be interesting. Your code should not break if given hundreds |
| 25 | of regular expressions or binary files to scan. |
| 26 | |
| 27 | 2) Sorting Test |
| 28 | |
| 29 | Sort an input file that consists of lines like this |
| 30 | |
| 31 | var1=23 other=14 ditto=23 fred=2 |
| 32 | |
| 33 | such that each output line is sorted WRT to the number. Order |
| 34 | of output lines does not change. Resolve collisions using the |
| 35 | variable name. e.g. |
| 36 | |
| 37 | fred=2 other=14 ditto=23 var1=23 |
| 38 | |
| 39 | Lines may be up to several kilobytes in length and contain |
| 40 | zillions of variables. |
| 41 | |
| 42 | 3) System Test |
| 43 | |
| 44 | Given a list of directories, report any bogus symbolic links contained |
| 45 | anywhere in those subtrees. A bogus symbolic link is one that cannot |
| 46 | be resolved because it points to a nonexistent or otherwise |
| 47 | unresolvable file. Do *not* use an external find executable. |
| 48 | Directories may be very very deep. Print a warning immediately if the |
| 49 | system you're running on doesn't support symbolic links. |
| 50 | |
| 51 | |
| 52 | I'll post perl solutions if people post the others. |
| 53 | |
| 54 | |
| 55 | --tom |
| 56 | -- |
| 57 | Tom Christiansen Perl Consultant, Gamer, Hiker tchrist@mox.perl.com |
| 58 | |
| 59 | "But Billy! A *small* allowance prepares you for a lifetime of small |
| 60 | salaries and for your Social Security payments." --Family Circus |