print ""; print "\n"; my $m_javaScriptPath = $m_filePath; $m_javaScriptPath =~ s/T\:Equipment Allocation\/Java//; print "\n"; print "\n"; print "$m_project EquipmentAllocation\n"; print "\n"; print "";