my $word = qr/^(directory|file|age|action)$/;