Re^4: cut of first char of a string

$_ = "a"; s/(.(.*))/($2ne'')?$2:$1/e; print
[download]

That gives "a". I'd expect nothing to get printed - if I remove the first character of a one-character string, I should be left with the empty string, not with the same string.

Comment on Re^4: cut of first char of a string Download Code

Replies are listed 'Best First'.
Re^5: cut of first char of a string by sh1tn (Priest) on Mar 08, 2005 at 15:27 UTC
$_ = "a"; s/(.(.))/($2ne'')?$2:$1/e; print That gives "a". I'd expect nothing to get printed - if I remove the first character of a one-character string, I should be left with the empty string, not with the same string. As stated - "First, but not last*" which means in plain English - the 1-st symbol is not the last one and if so - it is cut.	[reply]