guetzli.sh

flist=(`aws s3 ls s3://karsten-lambda-test --region eu-central-1 | awk '{print $4}'`)
for i in $flist; do aws s3 cp s3://karsten-lambda-test/$i . --region eu-central-1; guetzli --quality 90 $i $i.jpeg; mv $i.jpeg $i; aws s3 cp $i s3://karsten-lambda-test/$i --region eu-central-1; aws s3api put-object-tagging --bucket karsten-lambda-test --key $i --tagging "TagSet=[{Key=guetzli,Value=true}]" --region eu-central-1; done