use lib perllib
change --loop behaviour

Add another option for the former behaviour?