source:
tags/gsdl-2_30a-distribution/gsdl/bin/script/perlcalc.pl@
1932
Last change on this file since 1932 was 1932, checked in by , 23 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.