Help for this page

Select Code to Download

Select or download this

if (grep {$_->price <= 1000} @product_list) {
    # do stuff
}