Select Code to Download

template 1:
...
$marega;
%>

while($inp =~ /<%=(.*?)%>/s)
      {
...
      }

# only the concerned part of code with this extraction is written here

Dollar 1 before eval =
...
splthjobops=0 2 1 1 4 0 2 6 0 3 8 0 4 0 0

# here i expect the $1 contents after evaluation to come that is $capi
+ should be printed but instead $marega is executed.