poem
jesuashok
<code>
#!/usr/bin/perl
use strict;
sub always__I_am_a_perl_lover
{
print "I am always a perl lover, "
}
sub my_enemy_here
{
`kill $$`
}
#starting my poem with
always__I_am_a_perl_lover;
print "My enemy is waiting to destruct my love, so I \n" and my_enemy_here;
</code>
Result :-
<code>
$perl always__I_am_a_perl_lover
I am always a perl lover, My enemy is waiting to destruct my love, so I
Terminated
<code>
</code>
<br>
<b>Note:</b>Save the program in a file called 'always__I_am_a_perl_lover' and execute as shown above.