#include	<stdio.h>
#include	<iledef.h>


char msghdr [] = "From: terryshannon To: Undisclosed\n\
 Subject: And_Now_For_Something_FROM_THE GRAVE\n\
 Date: Sat, 31 Mar 2001 16:20:18 -1200\n\
 X-Mozilla-Status: 8001";


void	main	(void)
{
int	status,count;
ile2	itmlst[4];


	if ( !(1 & (status = hdr_parse( &msghdr,sizeof(msghdr),&itmlst))) )
		lib$signal(status);

	for (count = 0;count < 4;count++)
		{
		printf("Field #%u = '%.*s'\n",itmlst[count].ile2$w_code,
			itmlst[count].ile2$w_length,itmlst[count].ile2$ps_bufaddr);
		}

}