Your suggestion, and others, destroy the initial value. This might not matter, but if you want to keep your initial value use:

($firstword) = $word =~ /^(.*?):/;
[download]

This leaves $word eq 'Here:\: => M:\p_sold-cr_q00457655_EFLT' and sets $firstword eq 'Here';