title: Returning a substring using Perl regex
body: <p>I'm playing around with Perl and trying to get a better understanding of its substring/regex functionality.  </p>
  
  <p>Say I have a string such as</p>
  
  <p>[48:31.8] Sent: >33*1311875297587*eval*0*frame[0]*"A"&lt;</p>
  
  <p>and want to return 1311875297587.  It will always be in that format.  How would I do this using Perl? </p>
  
  <p>Thanks</p>