fork download
copy 
  1. #!/share/bin/perl
  2. @Names = ("London", "Paris", "New York", "Mumbai", "Cairo", "Tokyo", "Sao Paulo", "Detroit");
  3.  
  4. # Several forms of for loop used to print the contents of the list
  5. $size = @Names;
  6. print "There are ", $size, " Cities:\n";
  7. for($i=0;$i<$size;$i++) {
  8.         print $Names[$i] , "\n";
  9. }
  10.  
  11.  
Success #stdin #stdout 0.01s 5276KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
There are 8 Cities:
London
Paris
New York
Mumbai
Cairo
Tokyo
Sao Paulo
Detroit
https://ideone.com/4uo6GQ
language:
Perl (perl 5.28.1)
created:
2 hours ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!