C to Perl converter

Submit

Language is selected by the extension of the file. See the list of supported languages to know the extension of your language.

Problem

Convert C sources into Perl scripts.

Options

exec is denied

now post-mortem time, all source codes will be revealed

Sample input:_

// 1. hello world

#include <stdio.h>
#include <stdlib.h>

main(){
    printf("Hello, world!\n");
    exit(0);
}

Sample output:

# 1. hello world





printf("Hello, world!\n");
exit(0);

Sample input:_

// 19. fibonacci numbers

#include <stdio.h>
#include <stdlib.h>

main(){
    int a=1;
    int b=0;
    int i;
    for(i=1;i<=46;++i){
        printf("%d\n",a);
        a=a+b;
        b=a-b;
    }
    exit(0);
}

Sample output:

# 19. fibonacci numbers





my $a=1;
my $b=0;
my $i;
for($i=1;$i<=46;++$i){
    printf("%d\n",$a);
    $a=$a+$b;
    $b=$a-$b;
}
exit(0);

Sample input:_

// 34. fizzbuzz

#include <stdio.h>
#include <stdlib.h>

main(){
    int i;
    for(i=1;i<=100;++i){
        if(i%3==0){
            printf("Fizz");
        }
        if(i%5==0){
            printf("Buzz");
        }
        if(i%3!=0&&i%5!=0){
            printf("%d",i);
        }
        printf("\n");
    }
    exit(0);
}

Sample output:

# 34. fizzbuzz





my $i;
for($i=1;$i<=100;++$i){
    if($i%3==0){
        printf("Fizz");
    }
    if($i%5==0){
        printf("Buzz");
    }
    if($i%3!=0&&$i%5!=0){
        printf("%d",$i);
    }
    printf("\n");
}
exit(0);

Ranking

Ruby _

Perl _

Python _

Python3 _

Scheme _

JavaScript _

AWK _

sed _

xgawk _

Vim _

Language Ranking_

return to the top page