#!/usr/bin/env perl

use P5U;
use File::Basename 'basename';

unshift $1, @ARGV
	if basename($0) =~ /^p5u-(\w+)$/;

P5U->run;

__END__

