diff --git a/bin/slubsipbuilderbagit.pl b/bin/slubsipbuilderbagit.pl
index 8c79ecb0baffccfd2924934844ec4b5dc0a148e2..a4e813659c8dfb9454c849a2284d88d419a4c2a4 100644
--- a/bin/slubsipbuilderbagit.pl
+++ b/bin/slubsipbuilderbagit.pl
@@ -7990,12 +7990,14 @@ PATCH
         # create data dir
         SLUB::LZA::SIPBuilderBagIt::createDir($dataPath);
         # copy payload files to data
+        print_scalar_data("", "INFO: copying original data...", "", "white");
         dircopy($ieDirectory, $dataPath) || die ("Error coping $ieDirectory to $dataPath");
         # create meta dir
         SLUB::LZA::SIPBuilderBagIt::createDir($metaPath);
         # copy not payload files to meta
         SLUB::LZA::SIPBuilderBagIt::copyFilesToMeta($ppn, $noppn, $metaPath, $rightsFilePath, \@addMetaFile); 
         # create slub bagit
+        print_scalar_data("", "INFO: building DIP...", "", "white");
         SLUB::LZA::SIPBuilderBagIt::create_slub_bagit($bagPath, \@addBagInfo);
     }
     
@@ -8016,12 +8018,14 @@ PATCH
         # create bag dir
         SLUB::LZA::SIPBuilderBagIt::createDir($bagPath);
         # move payloads to data dir (which is automatically renamed from IE Directory)
+        print_scalar_data("", "INFO: moving original data...", "", "white");
         dirmove($ieDirectory, $dataPath) || die ("Error moving $ieDirectory to $dataPath");
         # create meta dir
         SLUB::LZA::SIPBuilderBagIt::createDir($metaPath);
         # copy not payload files to meta
         SLUB::LZA::SIPBuilderBagIt::copyFilesToMeta($ppn, $noppn, $metaPath, $rightsFilePath, \@addMetaFile);  
         # create slub bagit
+        print_scalar_data("", "INFO: building DIP...", "", "white");
         SLUB::LZA::SIPBuilderBagIt::create_slub_bagit($bagPath, \@addBagInfo);
     }
     
@@ -8042,12 +8046,14 @@ PATCH
         # create bag dir
         SLUB::LZA::SIPBuilderBagIt::createDir($bagPath);
         # move payloads to data dir (which is automatically renamed from IE Directory)
+        print_scalar_data("", "INFO: moving original data...", "", "white");
         dirmove($ieDirectory, $dataPath) || die ("Error moving $ieDirectory to $dataPath");
         # create meta dir
         SLUB::LZA::SIPBuilderBagIt::createDir($metaPath);
         # copy not payload files to meta
         SLUB::LZA::SIPBuilderBagIt::copyFilesToMeta($ppn, $noppn, $metaPath, $rightsFilePath, \@addMetaFile);  
         # create slub bagit
+        print_scalar_data("", "INFO: building DIP...", "", "white");
         SLUB::LZA::SIPBuilderBagIt::create_slub_bagit($bagPath, \@addBagInfo);
     }