{
    my @prunelist = split(',', $flexbackup{Prune} || '');
    
    return "" unless (scalar @prunelist);

    $OUT = '$prune';
    $OUT .= "{'/'} = '";
    $OUT .= join(' ', @prunelist);
    $OUT .= "';";
}
