16fb12b70Safresh1__END__ 2*b8851fccSafresh1# NAME our @a->{0} 3*b8851fccSafresh1# Somewhat nonsensical, but at least it should not fail an assertion. 4*b8851fccSafresh1our @a->{0}; 5*b8851fccSafresh1EXPECT 6*b8851fccSafresh1Can't use an undefined value as a HASH reference at - line 2. 7*b8851fccSafresh1######## 86fb12b70Safresh1# NAME [perl #119809] Attempt to bless into a reference (tied) 96fb12b70Safresh1sub TIESCALAR { bless [] } 106fb12b70Safresh1sub FETCH { [] } 116fb12b70Safresh1tie $t, ""; 126fb12b70Safresh1bless({}, $t); 136fb12b70Safresh1EXPECT 146fb12b70Safresh1Attempt to bless into a reference at - line 4. 156fb12b70Safresh1######## 166fb12b70Safresh1# NAME [perl #119809] Attempt to bless into a reference (magical) 176fb12b70Safresh1$/ = \1; 186fb12b70Safresh1bless [], $/ 196fb12b70Safresh1EXPECT 206fb12b70Safresh1Attempt to bless into a reference at - line 2. 216fb12b70Safresh1######## 226fb12b70Safresh1# NAME Attempt to bless into a reference after method changes 236fb12b70Safresh1sub foo{} bless [], bless [] 246fb12b70Safresh1EXPECT 256fb12b70Safresh1Attempt to bless into a reference at - line 1. 26