added perl function support

This commit is contained in:
Thomas von Dein
2020-04-13 20:22:46 +02:00
parent 763a9fd9f4
commit 72eecdf6e8
2 changed files with 44 additions and 26 deletions

View File

@@ -156,10 +156,26 @@ function name:
470
220
res2vcc
=> 2.79
You can also put the function definition in the config file
`~/.rpnc`. Empty lines and lines beginning with `#` will be ignored.
Another way to define a function is to use perl code directly. The
perl code must be a closure string and surrounded by braces. You can
access the stack via `@_`. Here's an example:
f pr { return "1.0 / (" . join(' + ', map { "1.0 / $_"} @_) . ")" }
This function calculates the parallel resistance of a number of
resistors. It adds up all values from the stack. Usage:
22
47
330
pr
=> 41.14
## Using STDIN via a PIPE