my (@f) = split // => $s;

##</code><code>##

my (
    $f0,
    $f1,
    $f2,
    $f3,
    $f4,
    $f5,
    $f6,
    $f7,
    $f8,
    $f9,
) = split // => $s;