Unix/Linux Perl Programming?

Oh man! Ad-blocking software has been detected! :'(

This website is run by the community, for the community... and it needs advertisements in order to keep running. Blocking our ads means your killing our stats!
Please disable your ad-block, or become a premium member to hide all advertisements and this notice.

The following is a section of a program. Show the value of each variable at each step:

@array =(0, 2..6, abc); What is @array?
$a = pop(@array); What is $a?
$b = shift(@array); What is $b?
What is @array?

Can someone please help me. This is what I have so far but it seems like its telling me that I have an error and it won't execute.

#!/bin/bash/perl
@array = ( 0, 2..6, abc );
$a = pop(@array);
$b = shift(@array);
print (What is @array?\n);
print ($array\n);
print ($a\n);
print ($b\n);
print (What is @array?\n);
print ($array\n);

the error that i am recieving is
./lab10.pl: line 5: syntax error near unexpected token `('
./lab10.pl: line 5: `@array = (0, 2..6, abc);'

I'd be greatful if you could help me out! Thank you.
No the way I have it there is what I have written on my program.

 

Oh man! Ad-blocking software has been detected! :'(

This website is run by the community, for the community... and it needs advertisements in order to keep running. Blocking our ads means your killing our stats!
Please disable your ad-block, or become a premium member to hide all advertisements and this notice.

I believe the point is to understand what the compiler/interpreter is doing for you by working out the state at each point in your head...

At no point does it ask you to write a program, point no.1, read the question !

 

This question is testing your understanding of arrays and list assignments, and use of the pop and shift array operators in Perl. The abc should really be quoted ie 'abc' or "abc" but Perl accepts unquoted strings (even though this issues a warning if warnings are switched on via -w on the command line, or if the 'use warnings;' pragma is added at the head of your source file).

To see the output of the program you've written, place double quotes around the contents within each of the print statements, eg :-

print ("$array\n");

instead of :-

print ($array\n);

Also, Perl allows you to dispense with the brackets, so you could just write :-

print "$array\n";

Don't use single quotes as this does not interpolate the \n end-of-line escape character.

Note you could also write :

print @array;

to output an array but this adds no spaces between the elements eg you get "23456".

print "@array"; will add the spaces, eg you get "2 3 4 5 6".