source:
trunk/gsdl/bin/script/perlcalc.pl@
4
Last change on this file since 4 was 4, checked in by , 25 years ago | |
---|---|
|
|
File size: 89 bytes |
Rev | Line | |
---|---|---|
[4] | 1 | #! /usr/local/bin/perl5 -w |
2 | ||
3 | while (defined($line=<STDIN>)) { | |
4 | print eval($line), "\n"; | |
5 | } |
Note:
See TracBrowser
for help on using the repository browser.