$ARGV[0]=$d; #### shift=$d;