Skip to content

Modificadores de Laço

Ou Loop Modifiers, em inglês, é uma opção que permite alterar o comportamento do fluxo do laço. Em C/C++ essa opção pode ser utilizada a partir do “continue” ou “break”.

Em Perl, podemos fazer a mesma operação com “next” e “last”.

Veja o Exemplo em Perl

#!/usr/bin/perl
use warnings;
use strict;

my $i;

for ( $i = 0; $i < 10 ; $i++ ) {
	if ( $i eq 5 ) {
		next;
	}
	print "Got this value on loop: $i \n";
}

A saída desse código será:

$ perl sample01.pl
Got this value on loop: 0
Got this value on loop: 1
Got this value on loop: 2
Got this value on loop: 3
Got this value on loop: 4
Got this value on loop: 6
Got this value on loop: 7
Got this value on loop: 8
Got this value on loop: 9

Em C, o código poderia ser da seguinte forma:

#include <stdio.h>
int main()
{

int i;

for ( i = 0 ; i < 10; i++ ) {
	if ( i == 5 ) {
		continue;
	}
	printf("Got this value on loop: %d \n", i);
}

return 0;
}

É sempre bom relembrar algumas coisas em Perl.

Comments are closed.