ÿþD z i s i e j s z y w y k Ba d
P r o g r a m o w a n i e w P e r l u
S k u p i m y s i n a j e d n y m z n a j p o t |n i e j s z y c h n a r z d z i w P e r l u
T a b l i c e a s o c j a c y j n e o r a z f u n k c j e t a b l i c o w e
n a t z w . h a s z a c h :
o m ó w i m y i s t o t h a s z ó w
s p o s o b y i n i c j a l i z a c j i h a s z ó w
M a r c i n J u n c z y s - D o w m u n t
s p o s o b y d o d a w a n i a i u s u w a n i e e l e m e n t ó w
j u n c z y s @ a m u . e d u . p l
s p o s o b y p r z e g l d a n i a h a s z ó w
W y d z i a B M a t e m a t y k i i I n f o r m a t y k i
O m ó w i m y p o w i z a n i a m i d z y h a s z a m i i t a b l i c a m i
h t t p : / / a m u . e d u . p l / ~ j u n c z y s
w t y m s o r t o w a n i e e l e m e n t ó w t a b l i c i h a s z ó w z a p o m o c s o r t
t w o r z e n i e n p . h a s z ó w z t a b l i c z a p o m o c m a p
M a r c i n J u n c z y s - D o w m u n t P r o g r a m o w a n i e w P e r l u 1 / 1 9 M a r c i n J u n c z y s - D o w m u n t P r o g r a m o w a n i e w P e r l u 2 / 1 9
C o t o j e s t h a s z ? I n i c j a l i z a c j a h a s z ó w
1 m y % d z w i e k i = (
H a s z j e s t s t r u k t u r p o d o b n d o t a b l i c y , a l e z a m i a s t i n d e k s ó w
l e w = > " g r r r " ,
l i c z b o w y c h h a s z u |y w a k l u c z y
p i e s = > " h a u " ,
B a r d z i e j s k o m p l i k o w a n a n a z w a d l a h a s z y t o t a b l i c e k o t = > " m i a u " ,
5 " t y g r y s b e n g a l s k i " = > " r o a r "
a s o c j a c y j n e , p o n i e w a | k o j a r z z e s o b k l u c z e i w a r t o [c i
) ;
K l u c z e m h a s z a m o |e b y d o w o l n a w a r t o [ s k a l a r n a , c z y l i
l i c z b a , Ba Dc u c h z n a k o w y ( l u b r e f e r e n c j a )
p r i n t " L e w r o b i " . $ d z w i e k i { " l e w " } . " \ n " ;
P r z e d r o s t k i e m d l a h a s z a j e s t z n a k % , k t ó r y m a p r z y p o m i n a p r i n t " P i e s r o b i " . $ d z w i e k i { p i e s } . " \ n " ;
1 0 p r i n t " K o t r o b i $ d z w i e k i { k o t } \ n " ;
p a r e l e m e n t ó w s k o j a r z o n y c h
p r i n t " T y g r y s r o b i $ d z w i e k i { t y g r y s b e n g a l s k i } \ n " ;
Z a m i a s t n a w i a s ó w [ ] k o r z y s t a m y z { } p r z y o d w o By w a n i u s i d o
w a r t o [c i h a s z ó w
K a n o n i c z n y s p o s ó b i n i c j a l i z a c j i h a s z ó w
H a s z e s j e d n z n a j p o t |n i e j s z y c h i n a j c z [c i e j u |y w a n y c h
K o j a r z y m y z e s o b n a z w y z w i e r z t o r a z w y d a w a n e d zw i k i
c e c h P e r l a
G d y k l u c z s k Ba d a s i z s a m y c h z n a k ó w a l f a n u m e r y c z n y c h ,
P o n o b y p r o g r a m o w a w P e r l u , t r z e b a m y [l e w h a s z a c h
m o |e m y o p u [c i c u d z y s Bó w
M a r c i n J u n c z y s - D o w m u n t P r o g r a m o w a n i e w P e r l u 3 / 1 9 M a r c i n J u n c z y s - D o w m u n t P r o g r a m o w a n i e w P e r l u 4 / 1 9
D o d a w a n i e e l e m e n t ó w d o h a s z ó w U s u w a n i e e l e m e n t ó w z h a s z a
1 m y % h a s z = ( k l u c z 1 = > 1 , k l u c z 2 = > 2 , k l u c z 3 = > 3 ) ;
# m y % h a s z = ( " k l u c z " , 1 , " k l u c z 2 " , 2 , " k l u c z 3 " , 3 ) ;
1 m y % o c z y ;
$ o c z y { k o t } = " 2 " ;
m y $ s k a l a r 1 = d e l e t e $ h a s z { k l u c z 1 } ;
5 # $ s k a l a r 1 r o w n y 1
@ o c z y { m r o w k a , w a z k a } = ( 4 , " m i l i o n " ) ;
5
m y $ s k a l a r 2 = d e l e t e @ h a s h { q w ( k l u c z 1 k l u c z 2 ) } ;
m y @ s t w o r y = q w ( p a n t o f e l e k , c z l o w i e k , p a j a k , m u c h a ) ;
# s k a l a r 2 r o w n y 2
@ o c z y { @ s t w o r y } = ( 0 , 2 , 8 , " d u z o z a d u z o " ) ;
1 0 @ t a b l i c a = d e l e t e @ h a s h { q w ( k l u c z 1 k l u c z 2 k l u c z 3 ) } ;
M o |e m y d o d a w a d o w o l n l i c z b e l e m e n t ó w d o h a s z a
# @ t a b l i c a r o w n a ( u n d e f , u n d e f , 3 )
P o n i e w a | n i e m a o k r e [l o n e j k o l e j n o [c i e l e m e n t ó w w h a s z u , n i e
p o t r z e b u j e m y f u n k c j i t y p u u n s h i f t , p u s h F u n k c j a w b u d o w a n a d e l e t e u s u w a p o d a n e e l e m e n t y z h a s z a
W k o n t e k [c i e s k a l a r n y m z w r a c a o s t a t n i u s u n i t y e l e m e n t l u b
P o d o b n i e j a k d l a t a b l i c i s t n i e j w y c i n k i h a s z ó w
u n d e f j e [l i e l e m e n t n i e i s t n i e j e
K a |d y w y c i n e k z h a s z a j e s t t a b l i c ( ! ) , s t d p r z e d r o s t e k @
W k o n t e k [c i e l i s t o w y m z w r a c a l i s t w s z y s t k i c h u s u n i t y c h
e l e m e n t ó w , w t y m u n d e f , j e [l i j a k i [ z e l e m e n t ó w n i e i s t n i e j e
M a r c i n J u n c z y s - D o w m u n t P r o g r a m o w a n i e w P e r l u 5 / 1 9 M a r c i n J u n c z y s - D o w m u n t P r o g r a m o w a n i e w P e r l u 6 / 1 9
S p r a w d z a n i e c z y e l e m e n t i s t n i e j e w h a s z u P r z e g l d a n i e h a s z ó w - w e d Bu g k l u c z y
1 m y % m i t y = (
1 m y % s l o w n i k = (
y e t i = > 0 ,
s z a f a = > " r z e c z o w n i k " , w i e l k i = > " p r z y m i o t n i k " ,
g w i a z d o r = > " " ,
m r u g a c = > " c z a s o w n i k " , k r o t k o = > " p r z y s l o w e k " ,
w i l k o l a k = > u n d e f
) ;
5 ) ;
5
f o r e a c h ( k e y s % s l o w n i k ) {
c h o m p ( m y $ t e s t = < S T D I N > ) ;
p r i n t " W y r a z $ _ t o $ s l o w n i k { $ _ } \ n " ;
i f ( e x i s t s ( $ m i t y { $ t e s t } ) ) {
}
p r i n t " $ t e s t i s t n i e j e , w a r t o s c $ m i t y { $ t e s t } \ n " ;
1 0 }
F u n k c j a w b u d o w a n a k e y s z w r a c a l i s t w s z y s t k i c h k l u c z y
e l s e {
d a n e g o h a s z a
p r i n t " $ t e s t n i e i s t n i e j e \ n " ;
}
M o |n a t l i s t z a p i s a d o z m i e n n e j t a b l i c o w e j l u b u |y w
d o w o l n y m k o n t e k [c i e l i s t o w y m
F u n k c j a e x i s t s s p r a w d z a , c z y d a n y e l e m e n t i s t n i e j e w h a s z u
E l e m e n t y w h a s z a c h n i e s u p o r z d k o w a n e , w i c l i s t a
I s t n i e n i e t a k i e j f u n k c j i j e s t k o n i e c z n e , p o n i e w a | w a r t o [
z w r ó c o n a p r z e z k e y s t e | n i e j e s t
s k o j a r z o n a z d a n y m k l u c z e m m o |e b y l o g i c z n y m f a Bs z e m
M a r c i n J u n c z y s - D o w m u n t P r o g r a m o w a n i e w P e r l u 7 / 1 9 M a r c i n J u n c z y s - D o w m u n t P r o g r a m o w a n i e w P e r l u 8 / 1 9
P r z e g l d a n i e h a s z ó w - w e d Bu g w a r t o [c i P r z e g l d a n i e h a s z ó w - w e d Bu g p a r k l u c z y i w a r t o [c i
1 m y % s l o w n i k = (
1 m y % s l o w n i k = (
s z a f a = > " r z e c z o w n i k " , w i e l k i = > " p r z y m i o t n i k " ,
s z a f a = > " r z e c z o w n i k " , w i e l k i = > " p r z y m i o t n i k " ,
m r u g a c = > " c z a s o w n i k " , k r o t k o = > " p r z y s l o w e k " ,
m r u g a c = > " c z a s o w n i k " , k r o t k o = > " p r z y s l o w e k " ,
) ;
) ;
5
5
f o r e a c h ( v a l u e s % s l o w n i k ) {
w h i l e ( m y ( $ w y r a z , $ c z e s c _ m o w y ) = e a c h % s l o w n i k ) {
p r i n t " S l o w n i k z a w i e r a n a s t . c z e s c i m o w y : \ n " ;
p r i n t " W y r a z $ w y r a z t o $ c z e s c _ m o w y \ n " ;
}
}
F u n k c j a w b u d o w a n a v a l u e s z w r a c a l i s t w s z y s t k i c h w a r t o [c i
F u n k c j a e a c h w k o n t e k [c i e l i s t o w y m d l a p o d a n e g o h a s z a
d a n e g o h a s z a ( o d p o w i e d n i k k e y s )
z w r a c a p a r k l u c z - w a r t o [ ( c z y l i l i s t d w u e l e m e n t o w )
W p r z e c i w i e Ds t w i e d o k l u c z y , w a r t o [c i w h a s z u m o g s i
P r z y k a |d y m w y w o Ba n i u e a c h z w r a c a k o l e j n p a r , a |
p o w t a r z a ( h a s z e s l e w o s t r o n n i e j e d n o z n a c z n e )
z a b r a k n i e p a r w h a s z u
N i e m a b e z p o [r e d n i e j m o |l i w o [c i w y [w i e t l e n i a k l u c z a d o
W k o n t e k [c i e s k a l a r n y m z w r a c a j e d y n i e k o l e j n e k l u c z e
o d p o w i e d n i e j w a r t o [c i
M a r c i n J u n c z y s - D o w m u n t P r o g r a m o w a n i e w P e r l u 9 / 1 9 M a r c i n J u n c z y s - D o w m u n t P r o g r a m o w a n i e w P e r l u 1 0 / 1 9
H a s z e - p o d s u m o w a n i e S o r t o w a n i e t a b l i c
J e [l i c h c e m y u p o r z d k o w a t a b l i c w e d Bu g j a k i e g o [ o k r e [l o n e g o
H a s z e t o s t r u k t u r y p o d o b n e d o l i s t , k t ó r e m a j z a w s z e
p o r z d k u k o r z y s t a m y z f u n k c j i s o r t
p a r z y s t l i c z b e l e m e n t ó w ( m o |e m y z a p i s y w a t a b l i c e d o
h a s z ó w i h a s z e d o t a b l i c )
1 @ l i s t a _ o b e c n o s c i = q w ( Z e n o n W l a d e k A n t e k M i r e k E d e k ) ;
p r i n t j o i n ( " \ n " , s o r t @ l i s t a _ o b e c n o s c i ) . " \ n " ;
H a s z e m o |n a t r a k t o w a j a k z b i o r y p a r k l u c z - w a r t o [ ( z b i ó r
p a r u p o r z d k o w a n y c h , r e l a c j a )
S o r t o w a n i e d z i a Ba t e | n a l i c z b a c h
E l e m e n t y h a s z ó w n i e s u p o r z d k o w a n e ( t a k j a k z b i ó r )
1 @ l i c z b y = ( 4 , 7 , 1 3 , 9 , 5 , 2 , 1 0 , 7 ) ;
K l u c z e h a s z y n i e m o g s i p o w t a r z a , p r ó b a d o d a n i a p a r y
p r i n t j o i n ( " , " , s o r t @ l i c z b y ) . " \ n " ;
k l u c z - w a r t o [ d l a i s t n i e j c e k l u c z a s p o w o d u j n a d p i s a n i e
A l e m o |e d z i a Ba d z i w n i e d l a w a r t o [c i m i e s z a n y c h
p o p r z e d n i e j w a r t o [c i ( r e l a c j a l e w o s t r o n n i e j e d n o z n a c z n a )
1 @ m i e s z a n e = ( 4 , " A n t e k " , 1 3 , 9 , " Z e n o n " , 2 , 1 0 , " M i r e k " ) ;
O p e r a t o r = > j e s t s y n o n i m e m p r z e c i n k a , ( o p e r a t o r l i s t o w y ) ,
p r i n t j o i n ( " , " , s o r t @ m i e s z a n e ) . " \ n " ;
d o d a t k o w o w y m u s z a p o l e w e j s t r o n i e k o n t e k s t Ba Dc u c h o w y
( n a w e t g d y k l u c z j e s t l i c z b ! ) W e d Bu g j a k i e g o p o r z d k u z o s t a Ba p o s o r t o w a n a o s t a t n i a l i s t a ?
M a r c i n J u n c z y s - D o w m u n t P r o g r a m o w a n i e w P e r l u 1 1 / 1 9 M a r c i n J u n c z y s - D o w m u n t P r o g r a m o w a n i e w P e r l u 1 2 / 1 9
S o r t o w a n i e t a b l i c - c i g d a l s z y I n n e s o r t o w a n i a
F u n k c j a s o r t m o |e d z i a Ba w e d Bu g d o w o l n y c h p o r z d k ó w
1 @ l i s t a = q w ( W a l d e k Z e n e k t o r t T o m e k O l g a A l a w o r e k ) ;
1 @ m i e s z a n e = ( 4 , " A n t e k " , 1 3 , 9 , " Z e n o n " , 2 , 1 0 , " M i r e k " ) ;
p r i n t j o i n ( " , " , s o r t {
p r i n t j o i n ( " , " , s o r t @ l i s t a ) . " \ n " ;
$ a < = > $ b o r $ a c m p $ b
p r i n t j o i n ( " , " , s o r t { l c ( $ a ) c m p l c ( $ b ) } @ l i s t a ) . " \ n " ;
} @ m i e s z a n e ) . " \ n " ;
5 p r i n t j o i n ( " , " , s o r t { l c ( $ b ) c m p l c ( $ a ) } @ l i s t a ) . " \ n " ;
K t o p o t r a f i w y t Bu m a c z y , d l a c z e g o t a k i z a p i s p o r z d k u j e w
@ r e v l i s t a = r e v e r s e s o r t { l c ( $ a ) c m p l c ( $ b ) } @ l i s t a ;
o b s e r w o w a n y s p o s ó b ?
p r i n t j o i n ( " , " , @ r e v l i s t a ) . " \ n " ;
W s k a z ó w k a : O p e r a t o r l o g i c z n y o r n i e s p r a w d z a w y r a |e n i a p o j e g o
p r a w e j s t r o n i e , g d y w y r a |e n i e p o l e w e j s t r o n i e j e s t p r a w d z i w e
1 0 p r i n t j o i n ( " , " , s o r t {
l e n g t h ( $ a ) < = > l e n g t h ( $ b ) o r $ a c m p $ b
Z m i e n n e $ a i $ b r e p r e z e n t u j d w i e p o r ó w n y w a n e w a r t o [c i
} @ l i s t a ) . " \ n " ;
s o r t o w a n e j l i s t y
O k r e [l a j c s p o s o b y p o r ó w n y w a n i a , o k r e [l a m y p o r z d k i p r i n t j o i n ( " , " , s o r t {
1 5 r e v e r s e ( $ a ) c m p r e v e r s e ( $ b )
s o r t o w a n i a
} @ l i s t a ) . " \ n " ;
S o r t o w a n i e , g d z i e l i c z b y p o p r z e d z a j Ba Dc u c h y j e s t t r u d n i e j s z e
M a r c i n J u n c z y s - D o w m u n t P r o g r a m o w a n i e w P e r l u 1 3 / 1 9 M a r c i n J u n c z y s - D o w m u n t P r o g r a m o w a n i e w P e r l u 1 4 / 1 9
S o r t o w a n i e a h a s z e F u n k c j a m a p - F u n k c y j n e p r z e t w a r z a n i e t a b l i c
1 m y % h a s z = (
b b = > " z z " , a a = > " y y " , 1 1 = > " x x " ,
) ;
1 m a p { B L O K } L I S T A
m a p ( W Y R A Z E N I E , L I S T A )
5 p r i n t " $ _ = > $ h a s z { $ _ } \ n "
f o r e a c h ( s o r t m y s o r t k e y s % h a s z ) ;
O b l i c z a w a r t o [ w b l o k u l u b w y r a |e n i u d l a k a |d e g o e l e m e n t u
t a b l i c y ( i t e r o w a n y c h z a p o m o c $ )
s u b m y s o r t {
Z w r a c a l i s t e l e m e n t ó w p o w s t a By c h p r z e z t a k i e o b l i c z e n i e
r e t u r n $ a < = > $ b o r $ a c m p $ b ;
1 0 }
W k o n t e k [c i e s k a l a r n y m z w r a c a l i c z b e l e m e n t ó w t a k
w y g e n e r o w a n y c h
H a s z e n i e m a j o k r e [l o n e g o p o r z d k u
B l o k l u b w y r a |e n i e s o b l i c z a n e w k o n t e k [c i e s k a l a r n y m , m o g
Z a p o m o c f u n k c j i s o r t o r a z n p . k e y s m o |e m y s o b i e s a m i
w i c z w r ó c i z e r o , j e d e n l u b k i l k a e l e m e n t ó w
o k r e [l i t a k i p o r z d e k
K r y t e r i a s o r t o w a n i a m o |n a o k r e [l i w e w Ba s n e j f u n k c j i ,
z m i e n n e $ a i $ b s s t a n d a r d o w o d o s t p n e
M a r c i n J u n c z y s - D o w m u n t P r o g r a m o w a n i e w P e r l u 1 5 / 1 9 M a r c i n J u n c z y s - D o w m u n t P r o g r a m o w a n i e w P e r l u 1 6 / 1 9
P r z y k Ba d g e n e r o w a n i e l i s t y o d m i a n y p r z y m i o t n i k ó w P r z y k Ba d u s u w a n i e p o w t a r z a j c y c h s i e l e m e n t ó w
1 m y @ t a b l i c a = q w ( a a a b b b a a b b a c a b a a ) ;
1 s u b g e n e r u j {
m y $ a d j = s h i f t ;
m y % h a s z = m a p { $ _ = > 1 } @ t a b l i c a ;
r e t u r n m a p {
@ p o j e d y n c z e = s o r t k e y s % h a s z ;
" $ a d j $ _ " , " $ { a d j } e r $ _ " , " $ { a d j } s t $ _ "
5
5 } q w ( e r e e s e n e m ) ;
p r i n t j o i n ( " " , @ p o j e d y n c z e ) . " \ n " ;
}
F u n k c j a m a p t w o r z y l i s t , w k t ó r e j n i e p a r z y s t e e l e m e n t y
F u n k c j a m a p t w o r z y d l a k a |d e j k o Dc ó w k i f l e k s y j n e j
p o c h o d z z @ t a b l i c a , p a r z y s t e e l e m e n t y t o 1
t r z y e l e m e n t o w l i s t ( r d z e n i a p r z y m i o t n i k a w s t o p n i u r ó w n y m ,
P r z y p i s a n i e t e j l i s t y d o h a s z a z a m i e n i a n i e p a r z y s t e e l e m e n t y
w y |s z y m , n a j w y |s z y m )
n a k l u c z e , p a r z y s t e n a w a r t o [c i h a s z a
W y n i k i e m j e s t l i s t a 1 5 - e l e m e n t o w a ( 3 × 5 ) p a m i t a m y , |e
W h a s z u k l u c z e n i e m o g s i p o w t a r z a ( w a r t o [c i s k o j a r z o n e z
d w i e l i s t y w k o n t e k [c i e l i s t o w y m Bc z s i w j e d n w i k s z l i s t
i s t n i e j c y m k l u c z e m z o s t a n n a d p i s a n e p r z e z n o w w a r t o [)
L i s t a j e s t z w r a c a n a z a p o m o c r e t u r n , n i e m a p o t r z e b y
T a b l i c a s k Ba d a j c a s i z s a m y c h k l u c z y t e g o h a s z a j e s t t a b l i c
t w o r z e n i a t a b l i c y t y m c z a s o w e j
z a w i e r a j c a t y l k o n i e p o w t a r z a j c e s i e l e m e n t y z @ t a b l i c a
M a r c i n J u n c z y s - D o w m u n t P r o g r a m o w a n i e w P e r l u 1 7 / 1 9 M a r c i n J u n c z y s - D o w m u n t P r o g r a m o w a n i e w P e r l u 1 8 / 1 9
P o d s u m o w a n i e
H a s z e t o j e d e n z n a j w a |n i e j s z y c h m e c h a n i z m ó w w P e r l u
B a r d z o w i e l e z a d a D p r o g r a m i s t y c z n y c h m o |n a r o z w i z a w
e l e g a n c k i s p o s ó b z a p o m o c h a s z y ( z a d a n i a d o m o w e )
P o z n a l i [m y k i l k a f u n k c y j n y c h s p o s o b ó w p r z e t w a r z a n i a l i s t i
h a s z ó w ( w e j [c i e m d o f u n k c j i j e s t l i s t a , w y j [c i e m l i s t a
p r z e t w o r z o n a )
M i d z y i n n y m i d z i k i t y m f u n k c j o m s k Ba d n i a P e r l a j e s t t a k a
z w i z Ba
Z a d a n i a w y k o n y w a n e p r z e z t e f u n k c j e z a j By b y k i l k a w i e r s z y
k a |d y m t r a d y c y j n y m j z y k u p r o g r a m o w a n i a
M a r c i n J u n c z y s - D o w m u n t P r o g r a m o w a n i e w P e r l u 1 9 / 1 9
Wyszukiwarka
Podobne podstrony:
Wyklad4 handoutWyklad07 handoutWyklad3 handoutWyklad17 handoutWyklad06 handoutWyklad2 handoutWyklad04 2008 handoutWyklad xmlparse handoutWyklad1 2008 handout20151012 MichalTrzesiok Statystyka wyklad2 miary statystyczne handoutWyklad03 2008 handoutWyklad2 2008 handoutWyklad05 2008 handout20151019 MichalTrzesiok Statystyka wyklad3 analiza korelacji handoutSieci komputerowe wyklady dr FurtakWykład 05 Opadanie i fluidyzacjaAGH Sed 4 sed transport & deposition EN ver2 HANDOUTwięcej podobnych podstron