#!/usr/bin/perl
# Bryan Bishop
# 2009-02-26
# kanzure@gmail.com
#
# This program generates the shell script for the 3000 CFGs -> DSM.

print "#!/bin/bash\n";

for ($i = 0; $i <= 999; $i++) {
	if($i < 10) { $num = "00$i"; }
	elsif ($i < 100) { $num = "0$i"; }
	elsif ($i < 1000) { $num = "$i"; }
	print "./utgraphmagic.pl 3000/peanutsheller-output/candidates$num.xml 3000/peanutsheller-output/candidates$num.dsm\n";
}

#for ($i = 0; $i <= 999; $i++) {
#	if($i < 10) { $num = "00$i"; }
#	elsif ($i < 100) { $num = "0$i"; }
#	elsif ($i < 1000) { $num = "$i"; }
#	print "./utgraphmagic.pl 3000/waterlifting-output/candidates$num.xml 3000/waterlifting-output/candidates$num.dsm\n";
#}

#for ($i = 0; $i <= 999; $i++) {
#	if($i < 10) { $num = "00$i"; }
#	elsif ($i < 100) { $num = "0$i"; }
#	elsif ($i < 1000) { $num = "$i"; }
#		print "./utgraphmagic.pl 3000/spices-output/candidates$num.xml 3000/spices-output/candidates$num.dsm\n";
#}