From 37ff104d1fccb081ec15be43eb2a02eebad4bb8c Mon Sep 17 00:00:00 2001 From: Joe Date: Thu, 2 Jan 2025 15:04:58 +0100 Subject: up --- .local/bin/dmclip | 19 +++++++++++++++++++ 1 file changed, 19 insertions(+) create mode 100755 .local/bin/dmclip (limited to '.local') diff --git a/.local/bin/dmclip b/.local/bin/dmclip new file mode 100755 index 0000000..d2369a1 --- /dev/null +++ b/.local/bin/dmclip @@ -0,0 +1,19 @@ +#!/usr/bin/env perl + +use strict; +use warnings; + +sub main +{ + my $color; + + $color = '#cc241d'; + if (@ARGV == 1) { + $color = $ARGV[0]; + } + return exec("clipmenu -i -sb '$color' -shb '$color'"); +} + +main(); + +__END__ -- cgit v1.2.3