#!/usr/bin/perl use strict; use warning; my $arg00=shift ( @ARGV ); my $arg01=shift ( @ARGV ); #printf $arg00+$arg01."\n"; printf sprintf( $arg00&$arg01 )."\n";