Select Code to Download

#!/usr/bin/perl

...
print qq(2: ),$a,qq(\n);

exit(0);

1: /i/αινσϊύz/pl
2: /i/

1: /i/αινσϊύz/pl
2: /i/αινσϊύz/pl