my @NonEmpty = grep { length } split(/:/, $text);




-----------------------------------------------------------------------------
Copyright 1997-2026 Jeffrey Friedl