[REBOL] REBOL Pop Mail

[trobrock]

I Have a pop mail checker script for REBOL and it uses this to list the
emails:

    messages: read
    pop://you-userid:your-password@your-pop-server

    foreach message messages [
    msg: import-email message
    print [
       "From: " first msg/from
       "Subject: " msg/subject
      ]
    ]

And I was wondering how to have the user input like a number or something
like that and it would show them like:

    From: [EMAIL PROTECTED]
    Subject: Subject
    Body:
          Message Body.
          Message Body.

Please Help. Thanks.