#!/usr/bin/perl -w

use strict;

my $x=$ARGV[0];
my $y=$ARGV[1];

if ($x - $y > 0) { print $y;
}
else { print $x; }