###################################################################
SicherungsProzess:
###################################################################

system("clear");
print "+-----------------------------------------------------+ \n";
print "| E*********** / Daten-Verwaltungs-Programm (EZ-DVP) | \n";
print "+-----------------------------------------------------+ \n";
print " \n";
print ">> Datenbank sichern << \n";
print " \n";
print " \n";

copy('/Desktop/EZ-Datenverwaltung/kunden.csv' , '/Desktop/EZ-Datenverwaltung/Data-Backup/kunden.csv');
copy('/Desktop/EZ-Datenverwaltung/kurzgeschichten.csv' , '/Desktop/EZ-Datenverwaltung/Data-Backup/kurzgeschichten.csv');
copy('/Desktop/EZ-Datenverwaltung/kundencounter.csv' , '/Desktop/EZ-Datenverwaltung/Data-Backup/kundencounter.csv');

print "Kunden-Datenbank wurde gesichert... OK \n";
print "Kurzgeschichten-Datenbank wurde gesichert... OK \n";
print "Kundenzähler-Datei wurde gesichert... OK \n";
print " \n";
print " \n";
print "Datensicherung beendet! [ENTER] \n";
$decider = <STDIN>;
goto HauptMenu;
exit;