The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
KING / Clipboard-0.13 / at / clipfilter-test 
#!/bin/sh -x
reset_data() {
    cat scripts/clip* |
        perl -Ilib -MClipboard -e 'Clipboard->copy(join "", <>)'
}
reset_data
perl -Ilib scripts/clipfilter -html # TODO: | tail <--buggy
reset_data
perl -Ilib scripts/clipfilter -uri
reset_data
perl -Ilib scripts/clipfilter tac