#!/usr/bin/perl
use strict;
use warnings;
use 5.012;
my $gas_cost = 1.5;
if ($gas_cost < 1) {goto ENDING_BRACE };
say "Intermediate";
ENDING_BRACE:
say "After";

##</code><code>##

{
    last if $gas_cost < 1;
    stuff here
}
continue here

##</code><code>##

func();
continue here;

sub func {
    return if $gas_cost < 1;
    stuff here
}

##</code><code>##

if ($gas_cost >= 1) {
    stuff here
}
continue here