sub int2mon {
    (Jan=>Feb=>Mar=>Apr=>May=>Jun=>Jul=>Aug=>Sep=>Oct=>Nov=>Dec=>)[shift]
}