specify the output of the program. You need to write five nonnegative integers less than six....

   

Transcribed Image Text:

specify the output of the program. You need to write five nonnegative integers less than six. #!/usr/bin/perl use warnings; use strict; my @words = ('192.165.0.0', ¹10.0.0.1', '10.a.0.2', '10.0.0', '192.168.0.0.1'); my $i = 0; for(@words){ if(/([0-9]{1,3}(\.[0-9]{1,3}}{3})/) { print($i," "); } else { print(5," "); specify the output of the program. You need to write five nonnegative integers less than six. #!/usr/bin/perl use warnings; use strict; my @words = ('192.165.0.0', ¹10.0.0.1', '10.a.0.2', '10.0.0', '192.168.0.0.1'); my $i = 0; for(@words){ if(/([0-9]{1,3}(\.[0-9]{1,3}}{3})/) { print($i," "); } else { print(5," ");

Answer rating: 100% (QA)

The image youve provided appears to contain a Perl script Although the image is somewhat blurred and ... View the full answer