perl -E'say for abc,123,def'                          23