Album
view release on metacpan or search on metacpan
helper/Makefile.eg view on Meta::CPAN
_DCIM := dcim
_DCF := 101msdcf
DCIM ?= ${_DCIM}/${_DCF}
RAW ?= ${DCIM}
OPTS ?=
PERL ?= perl
ALBUMCMD := $(PERL) -w $(TOOLS)/album.pl $(OPTS) --verbose
ifdef TARGET
default upload :: to-${TARGET}
else
default :: update update-ll
endif
################ ALBUM ################
IMPORT ?= $(shell test -d $(RAW) && echo "--dcim=$(RAW)")
update ::
${ALBUMCMD} --update $(IMPORT)
helper/Makefile.eg view on Meta::CPAN
zip -rn .jpg web.zip index*.html icons css medium index journal
################ UPLOADING ################
RESINFO := resinfo
# Rsync filter to copy all images, omitting -- and movies.
.filter : info.dat
perl -ne 'END{print"- *\n"} print "+ /$$1\n" if /^(\S+\.(?:jpg|png|webp))/ && !/\s+--\s/' $< > $@
define define_uploader
to-$(1) to_$(1) : .filter ;
rsync -virltD --modify-window=3601 \
--delete --delete-excluded --filter=". .filter" \
large/ \
$(1):$(shell ${RESINFO} albums.$(1).path)/${BASE}/
endef
ifdef TARGET
$(call define_uploader,${TARGET})
else
TARGETS := glaxxy glaxs4 glaxs7 glaxa8 largo
$(foreach host,${TARGETS},$(call define_uploader,$(host)))
endif
( run in 1.340 second using v1.01-cache-2.11-cpan-b16cb0d3907 )