$ perl -MMIME::Base64 -le 'print decode_base64(q{MTAwMWR1LnR4dA==});' 1001du.txt