my @results = qx(/software/bin/imeta ls -d $path);
my @created_date = grep ( /^(value: )(\d{4}-\d{2}-\d{2}T\w+)/,@results);

##</code><code>##

AVUs defined for dataObj 3a/73/2c/metadata.csv:
attribute: dcterms:created
value: 2014-08-13T00:00:10
units:
----
attribute: control
value: 0
units:
----
attribute: md5
value: 3a732cd0fddaa80fa65fcf28664eaf6d
units:
----