print "Enter blah blah blah\n";
$device_id = <STDIN>;

##</code><code>##

$device_id = shift(@ARGV);