in reply to Is it possible to split a hash key?

You are too scared of proper escaping. The first parameter to split is always a regexp even if you write a string (unless that string happens to be a single space). You have written split( /./ , $log ) says to split between every non-newline character. Further, the performance of all non-5.10 regexp engines are reduced by writing your dots as [.] instead of the literal \.. Your regexp and pattern to split should both read /\./.

⠤⠤ ⠙⠊⠕⠞⠁⠇⠑⠧⠊

Replies are listed 'Best First'.
Re^2: Is it possible to split a hash key?
by dbmathis (Scribe) on Jul 28, 2007 at 23:49 UTC
    That's right! I forgot to escape the reqex .

    Thanks for pointing that out.
[reply]
Re^2: Is it possible to split a hash key?
by Anno (Deacon) on Jul 29, 2007 at 12:13 UTC
    Just a side note. You wrote:

    The first parameter to split is always a regexp even if you write a string (unless that string happens to be a single space).

    A single space also results in (the equivalent of) a regex in split. The difference is that the regex is not the string itself (/ /) but /\s+/. Specifying ' ' is an alternaive way of invoking the default which is to split on white space.

    Anno

[reply]
[d/l]
[select]
      ... The difference is that the regex is not the string itself (/ /) but /\s+/

      ...not to forget the subtle, additional magic of ' ' vs. /\s+/ in the handling of leading whitespace. Compare 

      my $s = " foo bar baz";

print join("|", split /\s+/, $s), "\n";  # prints  |foo|bar|baz
print join("|", split ' ', $s), "\n";    # prints  foo|bar|baz

      [download]
[reply]
[d/l]
[select]
        ...not to forget the subtle, additional magic of ' ' vs. /\s+/ in the handling of leading whitespace.

        Oh right, that too. split() is too clever for its own good by half.

        Anno

[reply]
[d/l]

In Section Seekers of Perl Wisdom