Programmer's Purgatory

'Scott' on Tue, 03 Aug 2004 08:36:55 GMT, sez:

Stab in the dark (not yet being an avid user of Regex, and so determining requirements from the Input/Output examples)

Public Function SpacePascalCase(ByVal psPascalString As String) As String
Dim sResult As String
sResult = Replace(psPascalString, "Pascal", " Pascal ").Trim
Return sResult
End Function

'secretGeek' on Tue, 03 Aug 2004 20:46:44 GMT, sez:

nice one smartie pants!

'Ian Horwill' on Wed, 04 Aug 2004 10:00:19 GMT, sez:

Here's one I wrote for the same purpose, although we didn't have the requirement for separating out numbers:

Public Function Wordify(ByVal s As String) As String
'Add spaces to separate the capitalized words in the string, i.e. insert a space
'before each uppercase letter that is either preceded by a lowercase letter or
'followed by a lowercase letter (but not for the first char in string). This keeps
'groups of uppercase letters - e.g. acronyms - together.
Static regex As New Text.RegularExpressions.Regex("(?<=[a-z])(?<x>[A-Z])|(?<=.)(?<x>[A-Z])(?=[a-z])")
Return regex.Replace(s, " ${x}")
End Function

'sg' on Wed, 04 Aug 2004 20:55:52 GMT, sez:

See that Scott?

Some people are clever and can write solutions to problems without resorting to smarminess or cheap-geek-humour.

Thank you Ian!

lb

'daveyc' on Mon, 06 Oct 2008 02:21:36 GMT, sez:

Used your method - it works well, covers all my requirements and is easier to understand than one long (complex) regex.

Thanks.

'Gwyn Lail, II' on Tue, 23 Nov 2010 19:14:20 GMT, sez:

Best function I've found to handle Uppercase and Numbers. Only found one issue, when multiple uppercase characters are on the left side of numbers:

"ThisIsATestFFF333"
returns
"This Is A Test FF F 333"
would expect
"This Is A Test FFF 333"

Still, like I said, best solution I've found so far.

'John Hamm' on Mon, 04 Apr 2011 23:16:39 GMT, sez:

This handles uppercase, numbers, and multiple uppercase characters on the left side:

private string CamelCaseToWords(string Text) {
return Regex.Replace(Text, @"(?<=[a-z])(?<x>[A-Z])|(?<=.)(?<x>[A-Z])(?=[a-z])", " ${x}");
}

PascalCase -> Pascal Case
ABCPascal -> ABC Pascal
Pascal123 -> Pascal 123
123Pascal -> 123 Pascal
ThisIsATestFFF333 -> This Is A Test FFF 333

'John Hamm' on Mon, 04 Apr 2011 23:18:07 GMT, sez:

Oops, that was supposed to be:

private string CamelCaseToWords(string Text) {
return Regex.Replace("ThisIsATestFFF333", @"(?<=[a-z])(?<x>[A-Z])|(?<=.)(?<x>[A-Z])(?=[a-z])|(?<=[^0-9])(?<x>[0-9])(?=.)"," ${x}");
}


Output:
PascalCase -> Pascal Case
ABCPascal -> ABC Pascal
Pascal123 -> Pascal 123
123Pascal -> 123 Pascal
ThisIsATestFFF333 -> This Is A Test FFF 333

'John Hamm' on Mon, 04 Apr 2011 23:20:14 GMT, sez:

Wow, I can't even blame the time...

Final try!

private string CamelCaseToWords(string Text) {
return Regex.Replace(Text, @"(?<=[a-z])(?<x>[A-Z])|(?<=.)(?<x>[A-Z])(?=[a-z])|(?<=[^0-9])(?<x>[0-9])(?=.)"," ${x}");
}

'John hamm' on Mon, 04 Apr 2011 23:32:46 GMT, sez:

Last post I promise. I added a few more cases. It even handles camel cases where the "to" is lowercase, and mixed camel case and spaced text:

StringtoFix -> String to Fix
String toFix -> String to Fix
Comment9 -> Comment 9

The previous regular expressions would add double spaces to spaced text.

private string CamelCaseToWords(string Text) {
return Regex.Replace(Text, @"(?<x>to)(?=[A-Z0-9])|(?<=[a-z])(?<x>[A-Z])|(?<=[^ ])(?<x>[A-Z])(?=[a-z])|(?<=[^0-9 ])(?<x>[0-9])(?=(.|$))", " ${x}");
}

'Mark Christian Menchavez' on Wed, 14 Sep 2011 03:15:43 GMT, sez:

@secretgeek -- Need your RegEx help. How do I make the two commented cases pass?

string[][] cases =
{
new string[] {null, string.Empty},
new string[] {string.Empty, string.Empty},

new string[] {"Pascal", "Pascal"},
new string[] {"camel", "Camel"},

new string[] {"PascalCase", "Pascal Case"},
new string[] {"ABCPascal", "ABC Pascal"},
new string[] {"PascalABC", "Pascal ABC"},
new string[] {"Pascal123", "Pascal 123"},
new string[] {"Pascal123ABC", "Pascal 123 ABC"},
//new string[] {"PascalABC123", "Pascal ABC 123"},
new string[] {"123Pascal", "123 Pascal"},
new string[] {"123ABCPascal", "123 ABC Pascal"},
//new string[] {"ABC123Pascal", "ABC 123 Pascal"},

new string[] {"camelCase", "Camel Case"},
new string[] {"camelABC", "Camel ABC"},
new string[] {"camel123", "Camel 123"},
};


public static string ToFriendlyName(string value)
{
if (value == null) return string.Empty;
if (value.Trim().Length == 0) return string.Empty;

string result = value;

result = string.Concat(result.Substring(0, 1).ToUpperInvariant(), result.Substring(1, result.Length - 1));

result = Regex.Replace(result, "([^A-Z])([A-Z])", "$1 $2").Trim();
result = Regex.Replace(result, "([A-Z])([A-Z])([^A-Z])", "$1 $2$3").Trim();
result = Regex.Replace(result, "([A-Za-z])([0-9])", "$1 $2").Trim();
result = Regex.Replace(result, "([0-9])([A-Za-z])", "$1 $2").Trim();

return result;
}

name


website (optional)


enter the word:
 

comment (HTML not allowed)

All viewpoints welcome. Incivility is not tolerated, such comments are deleted.

 

TimeSnapper_{Know thyself!}

I'm the co-author of TimeSnapper, a life analysis system that stores and plays-back your computer use. It makes timesheet recording a breeze, helps you recover lost work and shows you how to sharpen your act.

 

NimbleText is a Powerful FREE Tool

I wrote this, and use it every day for:

• extracting data from text
• manipulating text
• generating code

It makes you look awesome. You should use NimbleText, you handsome devil!