fork download
  1. #!/usr/bin/perl
  2. @a=(3,9);
  3. my $c = (0,(@a));
  4. print $c;
  5.  
Success #stdin #stdout 0s 6044KB
stdin
Standard input is empty
stdout
2