大学での課題のために、e ストアの在庫を管理できるスクリプトを Perl で作成する必要があります。(与えられた例はAmazonでした)。ユーザーは完全にテキストベースの環境で注文を行うことができ、注文が完了すると在庫を更新する必要があります。
インベントリ内のすべてのアイテムには、3 ~ 4 つの属性があります。製品コード、タイトル、価格、および一部の金額 (たとえば、MP3 にはこの属性がありません)。
これが Perl との初めての出会いなので、どうやって始めればよいのかよくわかりません。私の主な問題は、プログラムでインベントリをどのように「実装」するかです。プログラムの機能の 1 つは、タイトルを検索することです。もう 1 つは、ユーザーが製品コードを指定して注文する方法です。
私の最初のアイデアは、プロダクトコードをキーとするハッシュでした。しかし、これが原因で問題になる可能性のあるタイトルを検索したい場合: ハッシュキーは DVD-123 のようなものになり、そのキーに属する情報は "The Green Mask 12" (引用符なし) で、12 が示す場合この DVD の現在の在庫数。したがって、最終的に 12 を無視する方法を見つける必要があります。
別の解決策は、タイトルをキーとして使用することでしたが、それも面倒だと思います。
2 つのキーを持つハッシュ テーブルを作成する方法はありますか?1 つだけを指定すると、他の値を持つ配列が返されますか? (他のキーと他の情報を含む)そうすれば、インベントリから必要な情報に応じて別のキーを使用できます。
次のようなテキスト ファイルからデフォルトのインベントリを読み取る必要があります。
MP3-72|レディー・ガガ - Kiss and Run (Fear of Commitment Monster)|0.99 CD-400|キングス・オブ・レオン - オンリー・バイ・ザ・ナイト|14.50|2 MP3-401|キングス オブ レオン - クローザー|0.85 DVD-144|自由に生きるか死ぬか|14.99|2 SOFT-864|Windows Vista|49.95