Shell Programming and Scripting

perl -npi.bak -e 'BEGIN{@mon=qw(null jan feb mar apr may jun jul aug sep oct nov dec);} s/avg_(\d).nc/avg_$mon[$1].nc/g;' monthly_means.dat

case month_num in
   1) month_name=jan ;;
   2) month_name=feb ;;
   3) month_name=mar ;;
   4) month_name=apr ;;
   5) month_name=may ;;
   6) month_name=jun ;;
   7) month_name=jul ;;
   8) month_name=aug ;;
   9) month_name=sep ;;
   10) month_name=oct ;;
   11) month_name=nov ;;
   12) month_name=dec ;;
   *) echo "Invalid month value" ;;
esac

#!/bin/sh

year_st=2001
year_en=2001
year=$year_st
while [ $year -le $year_en ]
do
 for var in jan feb mar apr may jun jul aug sep oct nov dec
   do
      echo $var_$year
     
   done
     year = $(( year_st+1 ))
 done