#!/usr/bin/perl
my $h = "hello";
my $w = "world";
for (my $i = 0; $i < 3; $i++) {
print "$h $w \n";
}
my $n = 0;
my $x = 100000000;
for (my $i = 0; $i < $x; $i++) {
$n++;
}
print "\n";
print "Counted to $n \n";
####
perl perl2c++.pl < hw.pl | tee hw.cpp && g++ hw.cpp -o hw.o && time perl hw.pl && time hw.o
##
##
#include
int main(){
//!/usr/bin/perl
std::string h("hello");
std::string w("world");
for (double i=0; i < 3; i++) {
std::cout << "" << h << " " << w << " \n";
}
double n=0;
double x=100000000;
for (double i=0; i < x; i++) {
n++;
}
std::cout << "\n";
std::cout << "Counted to " << n << " \n";
return 0;
}