#!/usr/bin/perl $ENV{XAUTHORITY} or $ENV{XAUTHORITY} = "$ENV{HOME}/.Xauthority"; exec "urpmi", "--X", @ARGV;