my @array=('data1','data2');
my @array1=('data1','data2');
my ($i,$k);
$i=7;
$k=7;
while($i){
$array [++$#array] = 'ree';
$i--;
print "@array";
}
while($k){
push(@array1,'ree');
$k--;
print "@array1";
}
Are these two while loop are doing the same functionality ?
What may be the difference?
Answer Posted / sugumar
Both are absolutely same in giving the output.
but in first method "$array [++$#array] = 'ree';"
we are preincrementing the array index manually and assigning the latest index to 'ree'; (SLower since we doing it as manual)
Where as in the second method, push is an array function where we need not care about index. it automatically increases the index value for the array. (Faster)
Both give same output as
data1 data2 ree
data1 data2 ree ree
data1 data2 ree ree ree
data1 data2 ree ree ree ree
data1 data2 ree ree ree ree ree
data1 data2 ree ree ree ree ree ree
data1 data2 ree ree ree ree ree ree ree
VALUES FOR K
data1 data2 ree
data1 data2 ree ree
data1 data2 ree ree ree
data1 data2 ree ree ree ree
data1 data2 ree ree ree ree ree
data1 data2 ree ree ree ree ree ree
data1 data2 ree ree ree ree ree ree ree
Is This Answer Correct ? | 1 Yes | 0 No |
Post New Answer View All Answers
List the files in current directory sorted by size ?
How to do comment in perl?
What is a chop() function in perl?
How to merge two arrays in perl?
What is goto statement in perl?
How to connect with sqlserver from perl and how to display database table info?
Explain lists ?
How do you set environment variables in perl?
what are the three groups involved in information sharing?
What is the use of '>>' in perl?
What is the use of -w, -t and strict in Perl?
Explain arrays in perl.
How to read multi lines from a file in perl?
How will you declare a variable in perl?
Mention the difference between die and exit in Perl?