#!/bin/csh

foreach a (`ls ${1}*out`)

perl -nae 'printf "%s %3d %3s %5d %2s %6.2lf\n", \
$F[0], $F[1], $F[2], $F[3], $F[4], $F[6] \
if $F[2] eq "ALA" && $F[4] eq "O" && $F[6] > 0' $a > $a-ALA_O

end

