#!/usr/bin/perl

use strict;
use Algorithm::Permute;

Algorithm::Permute::permute {
	print "@ARGV\n";
} @ARGV;