Index: /trunk/ippToPsps/perl/ippToPsps/Datastore.pm
===================================================================
--- /trunk/ippToPsps/perl/ippToPsps/Datastore.pm	(revision 29184)
+++ /trunk/ippToPsps/perl/ippToPsps/Datastore.pm	(revision 29185)
@@ -27,4 +27,14 @@
     bless $self, $class;
     return $self;
+}
+
+########################################################################################
+# 
+# Returns datastore product
+# 
+########################################################################################
+sub getProduct {
+    my ($self) = @_;
+    return $self->{_product};
 }
 
@@ -58,5 +68,6 @@
     print "* Successfully published $file to datastore\n";
 
-    close($tempFile);
+    close $tempFile;
+    unlink $tempFile;
 
     return 1;
