Perl Programming Fundamentals

index($string, "cd", 3) searches for cd starting from position 3 in abcdabcd. Positions 0-7: abcdabcd. From index 3, the next cd starts at index 6 (second cd). index returns the position where substring is found, making option A correct. Starting position 3 means it skips the first cd at position 2.

Perl's shift() function removes and returns the first element from an array. This is the standard way to access the first item, making option A correct. Functions like start, left$, and right$ don't exist in Perl. unshift adds to the beginning, pop/shift remove from ends, but shift is specifically for the first element.

In Perl, qq() operates like double quotes, so the variable $var is interpolated and replaced with its value "hello". Single quotes would not perform this interpolation.

The /s modifier in Perl regex makes the dot (.) metacharacter match any character including newline. Without /s, dot matches any character EXCEPT newline.

The s/// operator in Perl performs substitution (search and replace). The m// operator is for pattern matching only, while /g is a modifier that applies operations globally.

The -d command-line switch in Perl invokes the Perl debugger, allowing step-through debugging, breakpoints, and variable inspection.

In Unix and Linux file test operators, -S is specifically used to determine if a file is a socket. This is a duplicate of a previous question testing the same command-line flag.

Perl's sort function by default uses ASCII/Unicode code point ordering (lexicographic string comparison). Numeric sorting requires explicit comparison or the <=> operator.

The printf function is used in Perl when precise formatting of output is required, allowing C-style format specifiers. While Perl has a legacy format mechanism for text reports, printf is the standard tool for formatted printing. align and show are not built-in Perl formatting functions.

In Perl, the & symbol before a subroutine name calls that subroutine. Modern Perl style often omits the & when calling subroutines.

The my operator creates lexical variables in Perl, which are private to their scope. This is Perl's mechanism for creating private variables within subroutines.

The next operator in Perl jumps to the end of the current loop iteration and continues with the next iteration. In contrast, last exits the loop entirely, and redo restarts the current iteration.

The localtime function in Perl converts a Unix timestamp into a list of human-readable date/time components (seconds, minutes, hours, day, month, year, etc.).

In Perl, variables are uninitialized (have the special value undef) until they are first assigned a value. This is different from null in some languages or numeric defaults like 0. The undef value evaluates to false in boolean context and as an empty string or zero depending on context.

The built-in rename function in Perl is used to change a file's name or move it across directories. Other options like nameas, name, and now_known_as do not exist in Perl's standard function library, making them incorrect distractors.

In Perl, the open function requires a filehandle and an expression specifying the mode and filename, separated by a comma. open KAREN, ">sw"; correctly opens the file sw for writing (indicated by >) using the filehandle KAREN. Other options either omit the comma or reverse the argument order, which are syntactically invalid.

In Perl, the close function is used to close a filehandle. The syntax is 'close FILEHANDLE;' where FILEHANDLE is the name of the filehandle (without any prefix symbols). The close KAREN; statement properly closes the filehandle named KAREN.

The stat function in Perl returns a 13-element list giving status information about a file, including its owner UID, group GID, and change time (ctime).