Added Perl Sample

If field is empty (None) empty string is returned