Abbreviate Astronomical journals in a bib file

abbrv

#!/bin/bash
# Usage:
# abbrv "input_file.bib" > output_file.bib

file=$1

awk '{sub(/{Annual Review of Astronomy and Astrophysics}/, "{ARA\{\\\\\\&\}A}"); print}' $file |
awk '{sub(/{Monthly Notices of the Royal Astronomical Society}/,"{MNRAS}"); print}' |
awk '{sub(/{Mon. Not. R. Astron. Soc}/,"{MNRAS}"); print}' |
awk '{sub(/{Publications of the Astronomical Society of the Pacific}/,"{PASP}"); print}' |
awk '{sub(/{The Astronomical Journal}/,"{AJ}"); print}' |
awk '{sub(/{Astronomical Journal}/,"{AJ}"); print}' |
awk '{sub(/{Astrophysical Journal Letters}/,"{ApJL}"); print}' |
awk '{sub(/{Astrophysical Journal}/,"{ApJ}"); print}' |
awk '{sub(/{The Astrophysical Journal}/,"{ApJ}"); print}' |
awk '{sub(/{Astrophysical Journal Supplement Series}/,"{ApJS}"); print}' |
awk '{sub(/{The Astrophysical Journal Supplement Series}/,"{ApJS}"); print}' |
awk '{sub(/{Astronomy and Astrophysics}/,"{A\{\\\\\\&}A\}"); print}' |
awk '{sub(/{Astronomy \{\\\&\} Astrophysics}/,"{A\{\\\\\\&}A\}"); print}'