- or download this
#!/usr/bin/perl
use warnings;
...
my $result = $action->($operand1, $operand2);
$result = int $result if $is_integer;
say $result;
- or download this
[operation]
op = /
op1 = 10
op2 = 3
int = 1
- or download this
dancer2 gen -a webapp
- or download this
<form id="f1" method="post" action="/">
...
<button>Sumbit</button>
</form>
- or download this
<p>
Result: <% result %>
</p>
- or download this
package Op;
...
}
__PACKAGE__
- or download this
package webapp;
use Dancer2;
...
};
true;
- or download this
plackup bin/app.psgi