C / C++ / MFC

<string> ::= <string> <letter_comma_group>
         | (empty)
<letter_comma_group> ::= ['a'-'z'] ','

<string> ::= <letter_comma_group> <opt_string>
         |   (empty)
<opt_string> ::= <letter_comma_group> <opt_string>
             | (empty)
<letter_comma_group> ::= ['a'-'z'] ','

$p="a,b,c,d,e,f,g,";
$matchcount=0;

while ($p=~s/([a-z],)//)
	print ++$matchcount.": ".$1."\n";

$p="a,b,c,d,e,f,g,";
@results = split (/,/ ,$p);

foreach $result (@results)
{
  print $result."\n";
}

template <typename T>
class java_lookalike_helper {
protected:
    typedef T this_t;
};
 
#define this_ new (this) this_t
 
class Class : java_lookalike_helper<Class>  {
    int x, int y;
 
public:
    Class(int x_) : x(x_) {
    }
 
    Class(int x_, int y_) : y(_y) {
        this_(x_);  // Check out the spiffy java like syntax!
    }
};

BEGIN_MESSAGE_MAP(CSortListCtrl, CListCtrl)
	//{{AFX_MSG_MAP(CSortListCtrl)
	ON_NOTIFY_REFLECT(LVN_COLUMNCLICK, OnColumnClick)
	ON_WM_DESTROY()
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

void CSortListCtrl::OnColumnClick( NMHDR* pNMHDR, LRESULT* pResult )
{
	NM_LISTVIEW* pNMListView = (NM_LISTVIEW*)pNMHDR;
	const int iColumn = pNMListView->iSubItem;

	// if it's a second click on the same column then reverse the sort order,
	// otherwise sort the new column in ascending order.
	Sort( iColumn, iColumn == m_iSortColumn ? !m_bSortAscending : TRUE );

	RetrieveIndex();
	*pResult = 0;
}

BEGIN_MESSAGE_MAP(CListCtrl2, CListCtrl)
	//{{AFX_MSG_MAP(CListCtrl2)
	ON_NOTIFY_REFLECT_EX(LVN_COLUMNCLICK, OnColumnclick)
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()
// ...
BEGIN_MESSAGE_MAP(CTest2Dlg, CDialog)
	//{{AFX_MSG_MAP(CTest2Dlg)
	ON_NOTIFY(LVN_COLUMNCLICK, IDC_LIST1, OnColumnclickList1)
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()
// ...
BOOL CListCtrl2::OnColumnclick(NMHDR* pNMHDR, LRESULT* pResult) 
{
	TRACE("in the listctrl-derived class\n");
	*pResult = 0;
	return FALSE;
}
// ...
void CTest2Dlg::OnColumnclickList1(NMHDR* pNMHDR, LRESULT* pResult) 
{
	TRACE("in dialog class\n");
	*pResult = 0;
}