Shell Programming and Scripting

Hi, I have a text file with 1500 words. Could it be a script that will keep the words that only have all these letters:
n i o m s c t a
If you could show me the way I would be greatful!

Can you show example input file and desired output?

Consider regular expressions:
^[niomscta]+$ This is a character class that contains just these letters made of one or more letters.

Code:

    grep   '^[niomscta]+$' wordfile

Something like this?

Code:

perl -lane 'print join " ", grep { /\b[niomscta]+\b/ } (split / /);  ' file

Code:

/home/usr1 >cat file
sdafsa fljds dfs dsf niomscta   nio msd
sad nidso scata niow nioscata
sdasda sdjf niom
miom
fdsssdsf   sct
df

/home/usr1 >perl -lane 'print join " ", grep { /\b[niomscta]+\b/ } (split / /,$_);  ' file
niomscta nio
scata nioscata
niom
miom
sct

Well the wordlist has words like
html
121212
131313
123123
654321
8675309
666666
696969
888888
1234567
21122112
12345678
asdfjkl;
hal9000
bond007
ncc1701d
ncc1701e
ncc1701
thx1138
a12345
abcd1234


What I need is to find the word that is developed by the letters "n i o m s c t a" like "monastic".I don't need more or less letters (like "maso" or "monasticasctio")

---------- Post updated at 10:35 AM ---------- Previous update was at 10:23 AM ----------

I thought something like this:
#!/bin/sh
lol=`grep '^[n]' /home/alex/Desktop/wordlist.txt`
echo $lol > /home/alex/Desktop/lol
lol1=`grep '^[i]' /home/alex/Desktop/lol`
echo $lol1 > /home/alex/Desktop/lol1
lol2=`grep '^[o]' /home/alex/Desktop/lol1`
echo $lol2 > /home/alex/Desktop/lol2
lol3=`grep '^[m]' /home/alex/Desktop/lol2`
echo $lol3 > /home/alex/Desktop/lol3
lol4=`grep '^[s]' /home/alex/Desktop/lol3`
echo $lol4 > /home/alex/Desktop/lol4
lol5=`grep '^[c]' /home/alex/Desktop/lol4`
echo $lol5 > /home/alex/Desktop/lol5
lol6=`grep '^[t]' /home/alex/Desktop/lol5`
echo $lol6 > /home/alex/Desktop/lol6
lol7=`grep '^[a]' /home/alex/Desktop/lol6`
echo "Your word is: $lol7"

I don't know if this thought is correct...Is it?

You can still use code snippet provided..However, the shortened code is below for your requirement.

Code:

perl -lane 'print if (grep {/\b[niomscta]+\b/} $_);  ' file

{ perl -lane 'print if (grep {/\b[niomscta]+\b/} $_); ' file } doesn't really suits me. I want to take words from the wordlist with 8 characters (niomscta=8 chars) that contain ALL the letters : n i o m s c t a
Examples:
atcsmoin
oinmatcs
matcsoin etc...
Your command { perl -lane 'print if (grep {/\b[niomscta]+\b/} $_); ' file }
has this output:

Code:

alex@lol-pc:~$ perl -lane 'print if (grep {/\b[niomscta]+\b/} $_);  ' /home/alex/Desktop/wordlist.txt
montana
monica
macintos
action
tomcat
cannon
tinman
nissan
station
samson
tattoo
cccccc
sonics
cosmos
mission
tintin
moomoo

that doesn't suits me at all. I want to do a kind of unscrimbling (hope I wrote it correctly) but not from all the existing words! Only from the wordlist.txt's words!