Linuxer+2008-01-14 11:30:53--

Code (perl): (dl )

1
2
3

# gesuchte Spalte
$col_num = 3;
$foo = ( split( //, $string, $col_num+1 ) )[$col_num-1];

Aus [$col_num-1] noch [-2] machen, dann ist es in meinen Augen klarer, dass das vorletzte Element genommen werden soll und es ist zusätzlich noch schneller...