<%init>

foreach my $file_name ( keys %{$session{Attachments}{$$ARGSRef{'Token'}}} ) {
    my ($val, $result) = CheckAttachmentFilter(
        Queue => $$ARGSRef{'Queue'},
        FileName => $file_name,
    );

    if ( $val ) {
        delete $session{Attachments}{$$ARGSRef{'Token'}}{$file_name};
        push @$results, $result;
        $$skip_create = 1;
    }
}

</%init>
<%args>
$ARGSRef => undef
$results => undef
$skip_create => undef
</%args>