[!
use strict;
sub test
{
    $x = 1;
}
!]
[!
5 +
!]