Voici une petite astuce pour copier coller sous URXVT avec un Ctrl+Shif+ C puis Ctrl+Shift+V
On installe le paquet xsel qui va permettre de copier au clavier( c'est comme le paquet parcelite )
apt-get install xsel
Ensuite vous allez creer un fichier "clipboard" dans /usr/lib/urxvt/perl
#! perl -w
# Author: Bert Muennich
# Website: http://www.github.com/muennich/urxvt-perls
# License: GPLv2# Use keyboard shortcuts to copy the selection to the clipboard and to paste
<em id="__mceDel"># the clipboard contents (optionally escaping all special characters).</em>
<em id="__mceDel"><em id="__mceDel"> # Requires xsel to be installed!</em></em>
# Usage: put the following lines in your .Xdefaults/.Xresources:
# URxvt.perl-ext-common: ...,clipboard
# URxvt.keysym.M-c: perl:clipboard:copy
# URxvt.keysym.M-v: perl:clipboard:paste
# URxvt.keysym.M-C-v: perl:clipboard:paste_escaped
# Options:
# URxvt.clipboard.autocopy: If true, PRIMARY overwrites clipboard
# You can also overwrite the system commands to use for copying/pasting.
# The default ones are:
# URxvt.clipboard.copycmd: xsel -ib
# URxvt.clipboard.pastecmd: xsel -ob
# If you prefer xclip, then put these lines in your .Xdefaults/.Xresources:
# URxvt.clipboard.copycmd: xclip -i -selection clipboard
# URxvt.clipboard.pastecmd: xclip -o -selection clipboard
# On Mac OS X, put these lines in your .Xdefaults/.Xresources:
# URxvt.clipboard.copycmd: pbcopy
# URxvt.clipboard.pastecmd: pbpaste
# The use of the functions should be self-explanatory!
use strict;
sub on_start {
my ($self) = @_;
$self->{copy_cmd} = $self->x_resource('clipboard.copycmd') || 'xsel -ib';
$self->{paste_cmd} = $self->x_resource('clipboard.pastecmd') || 'xsel -ob';
if ($self->x_resource('clipboard.autocopy') eq 'true') {
$self->enable(sel_grab => \&sel_grab);
}
()
}
sub copy {
my ($self) = @_;
if (open(CLIPBOARD, "| $self->{copy_cmd}")) {
my $sel = $self->selection();
utf8::encode($sel);
print CLIPBOARD $sel;
close(CLIPBOARD);
} else {
print STDERR "error running '$self->{copy_cmd}': $!\n";
}
()
}
sub paste {
my ($self) = @_;
my $str = $self->{paste_cmd}; if ($? == 0) { $self->tt_paste($str); } else { print STDERR "error running '$self->{paste_cmd}': $!\n"; } () } sub paste_escaped { my ($self) = @_; my $str = $self->{paste_cmd}; if ($? == 0) { $str =~ s/([!#\$%&\*\(\) ='"\\\|\[\]`~,<>\?])/\\\1/g; $self->tt_paste($str); } else { print STDERR "error running '$self->{paste_cmd}': $!\n"; } () } sub on_user_command { my ($self, $cmd) = @_; if ($cmd eq "clipboard:copy") { $self->copy; } elsif ($cmd eq "clipboard:paste") { $self->paste; } elsif ($cmd eq "clipboard:paste_escaped") { $self->paste_escaped; } () } sub sel_grab { my ($self) = @_; $self->copy; () }
Ou téléchargez le ici: clipboard (En haut à gauche Fichier/Télécharger)
Ouvrez ensuite votre .Xdefaults et rajoutez "clipboard" à la fin de cette ligne:
URxvt.perl-ext-common: default,matcher,clipboard
Fermez et relancez,
Enjoy
