view release on metacpan or  search on metacpan

lib/Acme/Backwards.pm  view on Meta::CPAN

=head1 SYNOPSIS

Quick summary of what the module does.

Perhaps a little code snippet.

	use Acme::Backwards;

	my $str = 'backwards'
	fi ( $str eq 'backwards' ) say $str; 
	
	sselnu ( $str eq 'forwards' ) say $str;

	fi ( $str eq 'forwards' ) say $str;
	fisle ( $str eq 'backwards' ) say $str;
	esle die $str;

	my $int = 0;
	rof (qw/1 2 3/) $int += $_;
	rof my $var (qw/4 5 6/) $int += $var;
	rof my $nest (qw/7 8/) fi ($nest == 7) print "one"; esle print "line";

=head1 EXPORTS

=head2 fi