LHC Computer Grid - Rollout
> [mailto:[log in to unmask]] On Behalf Of Valentin Vidic
said:
> sgmuser=`awk -F: '$6=="sgm" && $5==tolower(virtorg){print
> $2}' virtorg=$VO ${USERS_CONF}`
> vo_user_prefix=`awk -F: '$6!="sgm" &&
> $5==tolower(virtorg){sub(/[0-9]+$/, "", $2); print $2}'
> virtorg=$VO ${USERS_CONF} | head -1`
... and people say perl is bad! My guess is that it's stripping trailing
digits but not checking that there are any?
Stephen
|