$temp = eval { $mech->get($imgsrc) }; if( not $temp ){ ... } #### eval { $mech->get( $imgsrc ); }; if( not $mech->res->is_success ){ ... } #### if( not eval { $mech->get( $imgsrc ); 1 } ){ ... } #### eval { $mech->get( $imgsrc ); 1 } or do { ... };