perl -MMIME::Base64 -le 1