MR97-ProcGen Vars Capture Regex

function vars_rip( $subject = '' )
{
	$nen = nen_ini();

	$pagedata = '';

	$subject=file_get_contents($nen['root'].'source/MR97 ProcGen Core.bas');
	$pattern = '/(?<var>([A-Za-z][A-Za-z0-9]*))(\$|\!|\&|\#|\%|)/';
	$match_count=preg_match_all($pattern, $subject, $matches );

	trk_echo2('match', $matches);

	for ( $index = 0; $index < $match_count; $index++ )
	{
		if( strlen( $matches[ $index ][ 1 ] ) > 0 )
		{
			$pagedata.= '<tr><td>'. $matches[ $index ][ 1 ]. '</td></tr>';
		}
	}

	if( strlen( $pagedata ) > 0 ){
		$pagedata = '<table>'. $pagedata. '</table>';
	}
	return $pagedata;
}