use warnings;
use POSIX;
use CGI ':standard';
++<<<<<<< HEAD
+# use Cwd;
++=======
+
+ use Cwd;
++>>>>>>> 23c29745c883ce981ed72e273f6aac8ccccab503
use CGI::Carp qw(fatalsToBrowser);
use HTML::Entities;
# require Common;
-style=>{'src'=>'../layout/styles.css'}
);
- # print h2("testgui");
- # print "<p> still more to come </p>";
+ if( $q->param('runtime') ) {
+ $runtime = $q->param('runtime');
+ }
++<<<<<<< HEAD
+# print escapeHTML("hallo<<<>>>&&&!!"),br;
+# print escapeHTML($here);
+# $ENV{'PATH'}=$ENV{'PATH'}.":/home/hadaq/bin";
+# $ENV{'PATH'}=$ENV{'PATH'}.":/local.1/bastelstube/daqdata/bin";
++=======
+ $ENV{'PATH'}=$ENV{'PATH'}.":/local.1/bastelstube/daqdata/bin";
++>>>>>>> 23c29745c883ce981ed72e273f6aac8ccccab503
# print br,$ENV{'PATH'},br;
-$ENV{'JTAGPATH'}="/local.1/jtag_mvd/soft/toolbox/jtag_atomic/";
-$ENV{'DAQOPSERVER'}="localhost:7";
+# $ENV{'JTAGPATH'}="/local.1/jtag_mvd/soft/toolbox/jtag_atomic/";
+# $ENV{'DAQOPSERVER'}="localhost:7";
+ unless(-e $dumpPath or mkdir $dumpPath) {
+ die "Unable to create $dumpPath\n";
+ }
+ unless(-e $picPath or mkdir $picPath) {
+ die "Unable to create $picPath\n";
+ }
+
++<<<<<<< HEAD
+system("./startup.pl ".SETUPFILE);
+chdir("preview");
++=======
+ system("./startup.pl ../setup/testsetup.xml");
+ # chdir("preview");
++>>>>>>> 23c29745c883ce981ed72e273f6aac8ccccab503
my $dummy;