use Win32::Process;

my $Process;
unless (Win32::Process::Create(
    $Process,
    "D:\\Profiles\\rkinyon1\\Desktop\\BOOST2\\mm_sim\\bin\\mm_sim.pl",
    "mm_sim.pl",
    0,
    DETACHED_PROCESS,
    "."))
{
    print "The process wasn't created\n";
} else {
    sleep 10;
    system "telnet localhost 4455";
}