my @args;
    push @args, $selected ? '5px' : '1px';
    push @args, 'dashed';
    push @args, 'red' if $selected;

    print border(@args), "\n";