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?
Answers were Sorted based on User's Feedback
Answer / 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 |
What does the q{ } operator do?
Why do you program in Perl?
Explain the execution of a program in perl.
What is the difference between localtime() and gmtime() functions?
You want to concatenate strings with perl. How would you do that?
How many loop control keywords are there in perl?
What is the use of command “use strict”?
Explain goto name?
explain the various functions/directives in perl that allow you to include/import a module. Also, state the differences between them.
Define print() function in perl?
How do I do fill_in_the_blank for each file in a directory?
Explain use of ‘my’ keyword in perl?