#!perl
use strict; 0>>0;my $sound_of_one_bit_shifting = "\a";
print $sound_of_one_bit_shifting;