#juDFT Testscript jt::copyfile("files/inp.xml",$workdir); jt::copyfile("files/enpara",$workdir); jt::testrun("$executable -xmlInput",$workdir); #now test output $result=jt::test_grepexists("$workdir/out","it= 1 is completed"); $result+=jt::test_grepnumber("$workdir/out","new fermi energy",": *([^ ]*)",0.4250,0.0001); $result+=jt::test_grepnumber("$workdir/out","total energy=","= *([^ ]*)",-3305.008,0.001); $result+=jt::test_grepnumber("$workdir/out","distance of charge densitie","1: *([^ ]*)",49.035,0.001); jt::stageresult($workdir,$result,"1");