aronj · November 20, 2016 15:17
diff --git a/selection-to-clipboard b/selection-to-clipboard
 #!/usr/bin/env perl

 # save as /usr/lib/urxvt/perl/clipboard
 # in .Xdefaults: URxvt.perl-ext-common: default,matcher,selection-to-clipboard

 sub on_sel_grab {
    my $text = quotemeta $_[0]->selection;
    $text =~ s/\n/\\n/g;
    $text =~ s/\r/\\r/g;
    system("echo $text|xclip -i -selection clipboard");
 }
	#!/usr/bin/env perl

	# save as /usr/lib/urxvt/perl/clipboard
	# in .Xdefaults: URxvt.perl-ext-common: default,matcher,selection-to-clipboard

	sub on_sel_grab {
	my $text = quotemeta $_[0]->selection;
	$text =~ s/\n/\\n/g;
	$text =~ s/\r/\\r/g;
	system("echo $text\|xclip -i -selection clipboard");
	}