#!/usr/bin/perl -ln

use strict;
use warnings;

print if -130 < $_ and $_ < -125;

__END__