| alzabo :: Intro. alzabo :: Intro´Â ¾ËÀÚ º¸ÀÌ¿¡ ´ëÇÑ ÀÔ¹® Á¤º¸°¡ Æ÷ÇÔ µÈ Perl ¸ðµâÀÔ´Ï´Ù. |
Áö±Ý ´Ù¿î·Îµå |
alzabo :: Intro. ¼øÀ§ ¹× ¿ä¾à
- ƯÇã:
- Perl Artistic License
- °Ô½ÃÀÚ À¥»çÀÌÆ®:
- http://search.cpan.org/~drolsky/
alzabo :: Intro. ű×
alzabo :: Intro. ¼³¸í
Alzabo :: Intro´Â ¾ËÀÚ º¸ (alzabo)¿¡ ´ëÇÑ ÀÔ¹® Á¤º¸°¡ Æ÷ÇÔ µÈ Perl ¸ðµâÀÔ´Ï´Ù. alzabo :: Intro´Â alzabo¿¡ ´ëÇÑ ÀÔ¹® Á¤º¸¸¦ Æ÷ÇÔÇÏ´Â perl ¸ðµâÀÔ´Ï´Ù. Schemathe¸¦ ¸ÕÀú ÇÒ ¼öÀÖ´Â ¹æ¹ýÀ» ÀÛ¼ºÇÏ´Â °ÍÀÔ´Ï´Ù. ÀÌ°ÍÀ»ÇÏ´Â °¡Àå ½¬¿î ¹æ¹ýÀº ±âÁ¸ ½ºÅ°¸¶¸¦ ¿£Áö´Ï¾î¸µÇÏ´Â °ÍÀÔ´Ï´Ù. ºÐ¸® µÈ Alzabo :: GUI :: Mason ¹èÆ÷ÆÇ¿¡¼ »ç¿ëÇÒ ¼öÀÖ´Â Mason GUI´Â ½ºÅ°¸¶¸¦ ¸¸µå´Â ¶Ç ´Ù¸¥ ¼ö´ÜÀ» Á¦°øÇÕ´Ï´Ù. ¹°·Ð ´Ù¾çÇÑ alzabo :: create :: * classes¸¦ »ç¿ëÇÏ´Â »ç¿ëÀÚ ÁöÁ¤ perl ½ºÅ©¸³Æ®¸¦ ÅëÇØ Çϳª¸¦ ¸¸µé ¼ö ÀÖ½À´Ï´Ù. ...¿¡ ´ÙÀ½Àº ÀÌ·¯ÇÑ ½ºÅ©¸³Æ®ÀÇ ½ÃÀÛ ºÎºÐÀÔ´Ï´Ù. alzabo :: create :: schema; eval {my $ s = alzabo :: create :: schema-> new (name => foo ', rdbms =>'mysql)); MY $ TABLE = $ S-> make_table (name => 'some_table'); my $ a_col = $ table-> make_column (name => a_column ', type =>'int ', nullable => 0, sequenced => 0, attributes => ); $ table-> add_primary_key ($ a_col); $ b_col = $ table-> make_column (name => 'b_column', type => 'varchar', length => 240, nullable => 0); $ table-> make_index (columns => ); ... $ S-> save_to_file; }; if ($ @) {¿¹¿Ü} »ç¿ë ¿¢½Ã½º ¾ËÀÚ º¸ÀÌ´Â °·ÂÇÑ µµ±¸ÀÌÁö¸¸ ¸¹Àº °·ÂÇÑ µµ±¸¿Í ¸¶Âù°¡Áö·Î óÀ½¿¡´Â Á¶±Ý ¾ÐµµÀû ÀÏ ¼ö ÀÖ½À´Ï´Ù. ±âº» ±â´É Áß ÀϺθ¦ ÀÌÇØÇÏ´Â °¡Àå ½¬¿î ¹æ¹ýÀº ¸î °¡Áö ¿¹¸¦ ÅëÇؼÀÔ´Ï´Ù. ´ÙÀ½ ½ºÅ°¸¶¸¦ ¸¸µé¾ú½À´Ï´Ù. Å×À̺í : movie movie_id tinyint - ±âº» Å° Á¦¸ñ VARCHAR (200) release_year ¿¬µµ Å×À̺í : Persone Person_ID Tinyint - ±âº» Å° À̸§ VARCHAR (200) BIDULDATE DATE BISTOLLACE_LOCATION_ID TINYINT - ¿Ü·¡ Å° À§Ä¡ Å×À̺í : Job Job_ID Tinyint - ±âº» Å° Job VARCHAR (200) - '¹è¿ì'¶Ç´Â 'ÀÌ»ç'Å×À̺í : Credit Movie_id Tinyint - ±âº» Å° ºÎÇ° 1, ¿µÈ Person_ID Tinyint - Primary Key Part 2, job_id tinyint - primary key part 3, jop Å×À̺íÀÇ ¿Ü·¡ Å° : À§Ä¡ location_id tinyint - ±âº» Å° À§Ä¡ VARCHAR (200) - '´º¿å½Ã'¶Ç´Â '¹Ì±¹'parent_location_id tinyint - ¿Ü±¹ Å° À§Ä¡ ¿ä±¸ »çÇ× : ¡¤ Perl.
alzabo :: Intro. °ü·Ã ¼ÒÇÁÆ®¿þ¾î