!/bin/sh

fname1=$ 1 
fname2=$ 2 

bIFS=IFS
IFS="
"
set `cat $fname1`

for i in $*
do
 echo $i
 sleep  7 
done


for i in $*
do
 echo $i
done | awk '{arr[length($0)]=$0}END{for (i in arr){print i "separator" arr[i]}}' | sort -n -t xaxa + 1  |
 sed s/^[ 0 - 9 ]*separator// > $fname2

IFS=$bIFS

read a
[ "$a" = "quit" ] && {
rm $fname2
exit
}

#!/bin/sh
awk 'BEGIN { FS=RS }
{ print length, $0 }' $* |
# Sort the lines numerically
sort +0n - 1  |
# Remove the length and the space and print each line
sed 's/^[0-9][0-9]* //'

#!/bin/sh

fname1=$ 1 
fname2=$ 2 

bIFS=$IFS
IFS="
"
set `cat $fname1`

for i in $*
do
 echo $i
 sleep  7 
done


for i in $*
do
 echo $i
done | awk 'BEGIN { FS=RS } { print length, $0 }' $* | sort +0n - 1  | sed 's/^[0-9][0-9]* //' > $fname2

IFS=$bIFS

read a
[ "$a" = "quit" ] && {
rm $fname2
exit
}

...
for i in $*
do
 echo $i
done   | perl -ne '@_=<>;print(sort {length($a)<=>length($b)} @_)' > $fname2
...

for i in $*
do
 echo $i
done  | while read a; do echo `expr length "$a"`-$a ; done | sort -t- +0n  | sed s/[ 0 - 9 ]*-//

#!/bin/ksh


fname1=$ 1 
fname2=$ 2 


bIFS=$IFS
IFS="
"
set `cat $fname1`

for i in $*
do
 echo $i
 sleep  7 
done



for i in $*
do
 echo $i
done |  awk '{print length($0)"-"$0}' | sort -t- + 0  -n | sed s/^[ 0 - 9 ]*-// > $fname2

IFS=$bIFS


read a
[ "$a" = "quit" ] && {
rm $fname2
exit
}

#!/bin/ksh

fname1=$ 1 
fname2=$ 2 

bIFS=$IFS
IFS="
"
set -A arr `cat $fname1`
IFS=$bIFS



bubble()
{
i= 1 
while [ "$i" -ne "${#arr[*]}" ]
do
 let j=${#arr[*]}- 1 
 while [ "$j" -ge "$i" ]
  do
   let tmp_i=$j- 1 
   [ `echo "${arr[$tmp_i]}" | wc -c | sed -e "s/^ *//"` -gt `echo "${arr[$j]}" | wc -c | sed -e "s/^ *//"` ]  && {
    tmp=${arr[$tmp_i]}
    arr[tmp_i]=${arr[j]}
    arr[j]=$tmp
    }
    let j=--
  done
let i=++
done
}

i= 0 
while [ "$i" -ne "${#arr[*]}" ]
do
 echo ${arr[$i]}
 let i=++
 sleep  7 
done

bubble



i= 0 
while [ "$i" -ne "${#arr[*]}" ]
do
 echo ${arr[$i]}
 let i=++
done > $fname2


read a
[ "$a" = "quit" ] && {
rm $fname2
exit
}

i= 0 
while read a
do
 arr[$i]=$a
 let i=++
done <$fname1