diff options
| -rw-r--r-- | utils/cli/ledgersmb_cli.pl | 2 | ||||
| -rw-r--r-- | utils/cli/sample.lsmb | 6 |
2 files changed, 7 insertions, 1 deletions
diff --git a/utils/cli/ledgersmb_cli.pl b/utils/cli/ledgersmb_cli.pl index 1dbbf2fa..faf77abd 100644 --- a/utils/cli/ledgersmb_cli.pl +++ b/utils/cli/ledgersmb_cli.pl @@ -22,7 +22,7 @@ while ($line = <>){ } elsif ($line =~ /^\s*(.+)\s*=\s*(.+)/){ $form->{$1} = $2; } elsif ($line =~ /^\s*CALL (.+)/){ - &{$1}(\%$form); + {$1}(\%$form); } elsif ($line !~ /^\s*$/) { die "Parse error in script file: $line"; } diff --git a/utils/cli/sample.lsmb b/utils/cli/sample.lsmb new file mode 100644 index 00000000..05650f97 --- /dev/null +++ b/utils/cli/sample.lsmb @@ -0,0 +1,6 @@ +# THe below line shows how to set the PGUSER environment variable +ENV:PGUSER = postgres +user = demo # set username +password = demo # set password +MODULE AR # load AR +CALL AR::transactions |