Help for this page
print "M$End";
for (my $i=$Start; $i <= ($End-1) ; $i++){ print "M$i --> V$i-->"; } print "M$End";
for (my $i=$Start; $i <= $End; $i++) { print "M$i"; print " --> V$i-->" unless $i == $End; }