$args{(split/=/)[0]}= (split/=/)[1] foreach (@ARGV);