String Perl

#!/usr/bin/perl -w
$wid = 255;
printf("Window ID=%x\n", $wid);