$query->{action} eq "post" ? ($allowed{msgid} = '^(\d+|new)$') && ($allowed{data}  = '^(([^|+]*[^|]+.*\|){4}[^|+]*[^|]+.*)$'):1;

##</code><code>##

$query->{action} eq "post" ? %allowed = (msgid => '(^\d+|new)$' , data  => '^(([^|+]*[^|]+.*\|){4}[^|+]*[^|]+.*)$)', action => 'post|edit|delete|long|short' ):1;