Shallow implementation of writing perl storable data