diff options
Diffstat (limited to 'utils/cli/ledgersmb_cli.pl')
| -rw-r--r-- | utils/cli/ledgersmb_cli.pl | 2 |
1 files changed, 1 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"; } |