can u convert above mentioned shell script in to perl script??

#!perl
system(<DATA>);
__END__
## Your shell script goes here
[download]

"can u convert above mentioned shell script in to perl script"

This is not a code writing service. What part do you have a problem with? Your post looks terrible, read How do I post a question effectively? for advice on formatting your post. Also:

• perlintro
• http://learn.perl.org
• http://perldoc.perl.org
• The tutorials section of this site

Update: fixed typo.