rename ($x->[0], "USB" . $ext) and print "rename was successful.\n";