Ideone.com

fork download

copy

#!/usr/bin/perl
use Data::Dumper;
 
$huita = 'abc';
@array = qw/ccc kkk/;
 
$_ = uc for $huita, @array;
 
print "$huita\n";
print Dumper \@array;

Success #stdin #stdout 0.02s 7416KB

stdin

copy

Standard input is empty

stdout

copy

ABC
$VAR1 = [
          'CCC',
          'KKK'
        ];

https://ideone.com/3WGK6T

language:

Perl (perl 5.28.1)

created:

visibility:

secret

Share or Embed source code

The brand new service which powers Ideone!

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