perl -MTime::Piece -le 'print localtime->strftime("%d/%m")'