I want Perl code to do the same thing as this code

By 3d5fe049

I want Perl code to do the same thing as this code,

import sys
for x in range(100000):
    print "HAPPY >> %s <<r" % str(x),
    sys.stdout.flush()

but in Perl language
Or Perl code does the same work and result

Source: Stack Overflow

    

Share it with your friends!

    Fatal error: Uncaught Exception: 12: REST API is deprecated for versions v2.1 and higher (12) thrown in /home/content/19/9652219/html/wp-content/plugins/seo-facebook-comments/facebook/base_facebook.php on line 1273