source: trunk/gsdl/bin/script/perlcalc.pl@ 4

Last change on this file since 4 was 4, checked in by sjboddie, 26 years ago

Initial revision

  • Property svn:executable set to *
  • Property svn:keywords set to Author Date Id Revision
File size: 89 bytes
Line 
1#! /usr/local/bin/perl5 -w
2
3while (defined($line=<STDIN>)) {
4 print eval($line), "\n";
5}
Note: See TracBrowser for help on using the repository browser.